• Course: YSC4103 MCS Capstone
  • Date created: 2019/02/25
  • Name: Linfan XIAO
  • Description: Implement the Fokas method as described in "Evolution PDEs and augmented eigenfunctions. Finite interval."

Let $C=C^{\infty}[0,1]$ be the set of functions with derivatives of all orders on $[0,1]$.

Define $n$ linearly independent boundary forms $\{B_j: C\to\mathbb{C}\mid j\in\{1,2,\ldots,n\}\}$ as follows: \begin{align*} B_j\phi &= \sum_{k=0}^{n-1} \left(b_{jk}\phi^{(k)}(0) + \beta_{jk}\phi^{(k)}(1)\right),\quad j\in \{1,2,\ldots, n\}, \end{align*} where $b_{jk}, \beta_{jk}\in\mathbb{R}$ are boundary coefficients. Define \begin{align*} \Phi &= \{\phi\in C: B_j\phi = 0\,\forall j \in \{1,2,\ldots, n\}\} \end{align*} to be the set of $n$ homogeneous boundary conditions \begin{align*} \left(b_{11}\phi^{(0)}(0) + \beta_{11}\phi^{(0)}(1)\right) + \cdots +\left(b_{1n}\phi^{(n-1)}(0) + \beta_{1n}\phi^{(n-1)}(1)\right) &= 0\\ &\vdots\\ \left(b_{n1}\phi^{(0)}(0) + \beta_{n1}\phi^{(0)}(1)\right) + \cdots +\left(b_{nn}\phi^{(n-1)}(0) + \beta_{nn}\phi^{(n-1)}(1)\right) &= 0. \end{align*} Let $S:\Phi\to C$ be the linear differential operator $$S\phi(x) = (-i)^n \phi^{(n)}(x).$$

Let $a\in\mathbb{C}$ be a constant. Consider the homogeneous initial-boundary value problem (IBVP): \begin{alignat*}{2} (\partial_t + aS)q(x,t) &= 0,\quad&(x,t)\in (0,1)\times (0,T)\\ q(x,0)&\in\Phi,\quad &x\in [0,1]\\ q(\cdot, t) &\in\Phi,\quad &t\in [0,T] \end{alignat*} Let $f(x):=q(x,0)$. We reqire that if $n$ is odd then $a=\pm i$ and if $n$ is even then $\Re(a)\geq 0$. We solve the IBVP for $q(x,t)$.

Importing packages

In [1]:
using SymPy
using PyCall
sympy = pyimport("sympy")
# using Roots
using Distributions
# using IntervalArithmetic
# using IntervalRootFinding
using ApproxFun

using Plots

using NBInclude
using QuadGK
import QuadGK.quadgk
# using HCubature
using ApproxFun
using Roots
using Gadfly
using PyPlot
# pygui(true)

using StringLiterals

Global variables

TOL

Error tolerance level.

In [2]:
TOL = 1e-05
Out[2]:
1.0e-5

DIGITS

The number of digits to display in symbolic expressions.

In [3]:
DIGITS = 3
Out[3]:
3

INFTY

A number representing infinity in numerical approximations.

In [4]:
INFTY = 10
Out[4]:
10

t

Free symbol in the unknown function $x(t)$ in the differential equation $Lx=0$.

In [5]:
# t = symbols("t")

sympy_Exprs

Sample expressions of type addition, multiplication, power, and exponential in SymPy.

In [6]:
x = symbols("x")
sympyAddExpr = 1 + x
Out[6]:
$$x + 1$$
In [7]:
sympyMultExpr = 2*x
Out[7]:
$$2 x$$
In [8]:
sympyPowerExpr = x^2
Out[8]:
$$x^{2}$$
In [9]:
sympyExpExpr = e^x
Out[9]:
$$e^{x}$$

Helper functions

check_all(array, condition)

Checks whether all elements in an array satisfy a given condition.

In [10]:
function check_all(array, condition)
    for x in array
        if !condition(x)
            return false
        end
    end
    return true
end
Out[10]:
check_all (generic function with 1 method)

Parameters

  • array: Array
    • Input array to be checked. Generic, not necessarily homogeneous.
  • condition: Function: Bool
    • Boolean function to be applied to each element in the array.

Returns

  • check_all: Bool
    • Returns true if all elements in array satisfy condition and false if any element does not satisfy the condition.

Example

In [11]:
array = [0,1,2,3]
condition = x -> x>2
check_all(array, condition)
Out[11]:
false

check_any(array, condition)

Checks whether any element in an array satisfy a given condition.

In [12]:
function check_any(array, condition)
    for x in array
        if condition(x)
            return true
        end
    end
    return false
end
Out[12]:
check_any (generic function with 1 method)

Parameters

  • array: Array
    • Input array to be checked. Generic, not necessarily homogeneous.
  • condition: Function: Bool
    • Boolean function to be applied to each element in the array.

Returns

  • check_all: Bool
    • Returns true if there exists an element in the array that satisfies a given condition and false if no element satisfies the condition.

Example

In [13]:
array = [0,1,2,3]
condition = x -> x>2
check_any(array, condition)
Out[13]:
true

set_tol(x, y)

Sets an appropriate tolerance for checking whether two numbers or two arrays of numbers are approximately equal.

In [14]:
function set_tol(x::Union{Number, Array}, y::Union{Number, Array}; atol = TOL)
    if isa(x, Number) && isa(y, Number)
       return atol * mean([x y])
    elseif isa(x, Array) && isa(y, Array)
        if size(x) != size(y)
            throw(error("Array dimensions do not match"))
        end
        # Avoid InexactError() when taking norm()
        x = convert(Array{Complex}, x)
        y = convert(Array{Complex}, y)
        return atol * (norm(x,2) + norm(y,2))
    else
        throw(error("Invalid input"))
    end
end
Out[14]:
set_tol (generic function with 1 method)

Parameters

  • x, y: Number or Array of Number
    • Objects to compare.

Returns

  • set_tol: Number
    • Returns a tolerance within which x and y are considered approximately equal (entry-wise if x, y are arrays).

Example

In [15]:
x = 14
y = 21
println("set_tol($x, $y) = $(set_tol(x,y))")

A = [4 0.6; 3 2]
B = [5 1; 10 3]
set_tol(A, B)
println("set_tol($A, $B) = $(set_tol(A,B))")
set_tol(14, 21) = 0.00017500000000000003
set_tol([4.0 0.6; 3.0 2.0], [5 1; 10 3]) = 0.00016901192145623727

evaluate(func, a)

Evaluate a univariate function or an array of them at a given value.

In [16]:
function evaluate(func::Union{Function, SymPy.Sym, Number}, a::Number)
    if isa(func, Function)
        funcA = func(a)
    elseif isa(func, SymPy.Sym) # SymPy.Sym must come before Number because SymPy.Sym will be recognized as Number
        freeSymbols = free_symbols(func)
        if length(freeSymbols) > 1
            throw(error("func should be univariate"))
        elseif length(freeSymbols) == 1
            t = free_symbols(func)[1,1]
            if isa(a, SymPy.Sym) # if x is SymPy.Sym, do not convert result to Number to preserve pretty printing
                funcA = subs(func, t, a)
            else
                funcA = SymPy.N(subs(func, t, a))
            end
        else
            funcA = func
        end
    else # func is Number
        funcA = func
    end
    return funcA
end
Out[16]:
evaluate (generic function with 1 method)

Parameters

  • func: Function, SymPy.Sym, Number, or Array
    • Object to be evaluated. Note that SymPy.Sym is absorbed into Number.
  • x: Number
    • Value on which func is to be evaluated at.
  • t: SymPy.Sym
    • Free symbol in func if func is a SymPy.Sym object or an array of them.

Returns

  • evaluate: Number
    • Returns the value of func at x.

Example

In [17]:
func = x -> x+1
xVal = 2
println("func($xVal) = $(evaluate(func, xVal))")

x = symbols("x")
func = x+1
println("func($xVal) = $(evaluate(func, xVal))")

a = symbols("a")
println("func($a) = $(evaluate(func, a))")

x = symbols("x")
array = [2x 1; x^3 x]
a = symbols("a")
evaluate.(array, a)
func(2) = 3
func(2) = 3
func(a) = a + 1
Out[17]:
\begin{bmatrix}2 a&1\\a^{3}&a\end{bmatrix}

partition(n)

Generate ordered two-integer partitions ($0$ included) of a given non-negative integer.

In [18]:
function partition(n::Int)
    if n < 0
        throw(error("Non-negative n required"))
    end
    output = []
    for i = 0:n
        j = n - i
        push!(output, (i,j))
    end
    return output
end
Out[18]:
partition (generic function with 1 method)

Parameters

  • n: Int
    • Non-negative integer to be partitioned.

Returns

  • partition: Array of Tuple{Int, Int}
    • Returns an array of tuples, where each tuple corresponds to a two-integer parition of n. Note that a tuple is ordered, and (i, j) and (j, i) are considered distinct partitions.

Example

In [19]:
n = 5
partition(5)
Out[19]:
6-element Array{Any,1}:
 (0, 5)
 (1, 4)
 (2, 3)
 (3, 2)
 (4, 1)
 (5, 0)

get_deriv(u, k)

Constructs the symbolic expression for the $k$th derivative of a univariate function u.

In [20]:
function get_deriv(u::Union{SymPy.Sym, Number}, k::Int)
    if k < 0
        throw(error("Non-negative k required"))
    end
    if isa(u, SymPy.Sym)
        freeSymbols = free_symbols(u)
        if length(freeSymbols) > 1
            throw(error("u should be univariate"))
        elseif length(freeSymbols) == 1
            t = freeSymbols[1]
            y = u
            for i = 1:k
                newY = diff(y, t)
                y = newY
            end
            return y
        else
            if k > 0
                return 0
            else
                return u
            end
        end
    else
        if k > 0
            return 0
        else
            return u
        end
    end
end
Out[20]:
get_deriv (generic function with 1 method)

Parameters

  • u: SymPy.Sym or Number
    • Function to be differentiated.
  • k: Int
    • Degree of the desired derivative.

Returns

  • get_deriv: SymPy.Sym
    • Returns the $k$th derivative of u.

Example

In [21]:
u = 3
k = 1
println("get_deriv($u, $k) = $(get_deriv(u, k))")

t = symbols("t")
u = t^2+2t+3
get_deriv(u, k)
get_deriv(3, 1) = 0
Out[21]:
$$2 t + 2$$

add_func(f, g)

Computes the sum of two functions using the function addition given by $(f + g)(x) := f(x) + g(x)$.

In [22]:
function add_func(f::Union{Number, Function}, g::Union{Number, Function})
    function h(x)
        if isa(f, Number)
            if isa(g, Number)
                return f + g
            else
                return f + g(x)
            end
        elseif isa(f, Function)
            if isa(g, Number)
                return f(x) + g
            else
                return f(x) + g(x)
            end
        end
    end
    return h
end
Out[22]:
add_func (generic function with 1 method)

Parameters

  • f, g: Function or Number
    • Functions to be added.

Returns

  • add_func: Function or Number
    • Returns the sum of f and g.

Example

In [23]:
f(x) = x^3+1
g(x) = 4x
x = 2
add_func(f, g)(x) == f(x) + g(x)
Out[23]:
true

mult_func(f, g)

Computes the product of two functions using the function multiplication given by $(f \cdot g)(x) := f(x) \cdot g(x)$.

In [24]:
function mult_func(f::Union{Number, Function}, g::Union{Number, Function})
    function h(x)
        if isa(f, Number)
            if isa(g, Number)
                return f * g
            else
                return f * g(x)
            end
        elseif isa(f, Function)
            if isa(g, Number)
                return f(x) * g
            else
                return f(x) * g(x)
            end
        end
    end
    return h
end
Out[24]:
mult_func (generic function with 1 method)

Parameters

  • f, g: Function or Number
    • Functions to be multiplied.

Returns

  • add_func: Function or Number
    • Returns the product of f and g.

Example

In [25]:
f(x) = x^3+1
g(x) = 4x
x = 2
mult_func(f, g)(x) == f(x) * g(x)
Out[25]:
true

sym_to_func(sym)

Converts a univariate symbolic expression to a function.

In [26]:
function sym_to_func(sym::Union{SymPy.Sym, Number})
    try
        freeSymbols = free_symbols(sym)
        if length(freeSymbols) > 1
            throw(error("sym should be univariate"))
        else
            function func(x)
                if length(freeSymbols) == 0
                    result = SymPy.N(sym)
                else
                    result = SymPy.N(subs(sym, freeSymbols[1], x))
                end
                return result
            end
            return func
        end
    catch
        function func(x)
            return sym
        end
        return func
    end
end
Out[26]:
sym_to_func (generic function with 1 method)

Parameters

  • sym: SymPy.Sym or Number
    • Symbolic expression to be converted.

Returns

  • sym_to_func: Function
    • Function converted from sym.

Example

In [27]:
t = symbols("t")
sym = t^2+t
tVal = 2
println("sym_to_func($sym)($tVal) = $(sym_to_func(sym)(tVal))")

sym = [1 t; t^2 t^3]
sym_to_func.(sym)[2,1](2)
println("sym_to_func($sym[2,1])($tVal) = $(sym_to_func.(sym[2,1])(tVal))")

sym = 2
println("sym_to_func($sym)($tVal) = $(sym_to_func(sym)(tVal))")
sym_to_func(t^2 + t)(2) = 6
sym_to_func(SymPy.Sym[1 t; t^2 t^3][2,1])(2) = 4
sym_to_func(2)(2) = 2

prettyRound(x, digits)

Round a number at a given number of digits.

In [28]:
function prettyRound(x::Number; digits::Int = DIGITS)
    if isa(x, Int)
        return x
    elseif isa(x, Real)
        if isa(x, Rational) || isa(x, Irrational) # If x is rational or irrational numbers like e, pi
            return x
        elseif round(abs(x), digits) == floor(abs(x))
            return Int(round(x))
        else
            return round(x, digits)
            # return rationalize(x)
        end
    elseif isa(x, Complex)
        roundedReal = prettyRound(real(x), digits = digits)
        roundedComplex = prettyRound(imag(x), digits = digits)
        return roundedReal + im*roundedComplex
    else
        return round(x, digits)
    end
end
Out[28]:
prettyRound (generic function with 1 method)

Parameters

  • x: Number
    • Number to be rounded.
  • digits*: Int
    • Number of decimal places to keep. Default to the global variable DIGITS.

Returns

  • prettyRound: Number
    • Returns x rounded to the digits decimal places.

Example

In [29]:
# x = 0.0000001*im
x = 4.854572304702339 - 49.023298458074294im
prettyRound(x)
println("prettyRound($x) = $(prettyRound(x))")

x = [1/3 1/4 0]
println("prettyRound($x) = $(prettyRound.(x))")

x = [1//3 1//4 0//1]
println("prettyRound($x) = $(prettyRound.(x))")
prettyRound(4.854572304702339 - 49.023298458074294im) = 4.855 - 49.023im
prettyRound([0.333333 0.25 0.0]) = Real[0.333 0.25 0]
prettyRound(Rational{Int64}[1//3 1//4 0//1]) = Rational{Int64}[1//3 1//4 0//1]

prettyPrint(x)

Prints a symbolic scalar pretty-rounded floating numbers.

In [30]:
function prettyPrint(x::Union{Number, SymPy.Sym})
    expr = x
    if isa(expr, SymPy.Sym)
        prettyExpr = expr
        for a in sympy[:preorder_traversal](expr)
            if length(free_symbols(a)) == 0 && length(args(a)) == 0
                if !(a in [e, PI]) && length(intersect(args(a), [e, PI])) == 0 # keep the transcendental numbers as symbols
                    prettyA = prettyRound.(SymPy.N(a))
                    prettyExpr = subs(prettyExpr, (a, prettyA))
                end
            end
        end
    else
        prettyExpr = prettyRound.(expr)
        prettyExpr = convert(SymPy.Sym, prettyExpr)
    end
    return prettyExpr
end
Out[30]:
prettyPrint (generic function with 1 method)

Parameters

  • x: Number or SymPy.Sym
    • Object to be printed.

Returns

  • prettyPrint: SymPy.Sym
    • Returns symbolic expression of x with pretty-rounded floating numbers.

Example

In [31]:
t = symbols("t")
x = 1//3*t + e^(2t) + PI/2 + 1.00001*im + sympy[:sqrt](2) + 1//6
prettyPrint(x)
Out[31]:
$$\frac{t}{3} + e^{2 t} + \frac{1}{6} + \sqrt{2} + \frac{\pi}{2} + i$$
In [32]:
t = symbols("t")
x = [1//3*t PI; 1//6*t^2+t 1]
prettyPrint.(x)
Out[32]:
\begin{bmatrix}\frac{t}{3}&\pi\\\frac{t^{2}}{6} + t&1\end{bmatrix}
In [33]:
x = [0.0+1.0*im 1.0+0.0*im -1.0+0.0*im 0.0-1.0*im]
prettyPrint.(x)
Out[33]:
\begin{bmatrix}i&1&-1&- i\end{bmatrix}

is_approxLess(x, y; atol)

Checks whether $x$ is approximately less than $y$ within a tolerance. That is, whether $x\not\approx y$ and $x<y$.

In [34]:
function is_approxLess(x::Number, y::Number; atol = TOL)
    return !isapprox(x,y; atol = atol) && x < y
end
Out[34]:
is_approxLess (generic function with 1 method)

Parameters

  • x, y: Number
    • Numbers to compare.
  • atol*: Number
    • Tolerance within which $x$ would be considered approximately equal to $y$. Default to the global variable TOL.

Returns

  • is_approxLess: Bool
    • Returns true if $x\not\approx y$ within atol and $x<y$, and false otherwise.

Example

In [35]:
x = 1
y = x + TOL/2
println("is_approxLess($x,$y) = $(is_approxLess(x,y))")

y = x + TOL*2
println("is_approxLess($x,$y) = $(is_approxLess(x,y))")
is_approxLess(1,1.000005) = false
is_approxLess(1,1.00002) = true

is_approx(x, y; atol)

Checks whether $x$ is approximately equal to $y$ within a tolerance.

In [36]:
function is_approx(x::Number, y::Number; atol = TOL)
    return isapprox(x, y; atol = atol)
end
Out[36]:
is_approx (generic function with 1 method)

Parameters

  • x, y: Number
    • Numbers to compare.
  • atol*: Number
    • Tolerance within which $x$ would be considered approximately equal to $y$. Default to the global variable TOL.

Returns

  • is_approx: Bool
    • Returns true if $x\approx y$ within atol and false otherwise.

Example

In [37]:
x = 1
y = x + TOL/2
println("is_approx($x,$y) = $(is_approx(x,y))")

y = x + TOL*2
println("is_approx($x,$y) = $(is_approx(x,y))")
is_approx(1,1.000005) = true
is_approx(1,1.00002) = false

argument(z)

Finds the argument of a complex number in $[0,2\pi)$.

In [38]:
function argument(z::Number)
    if angle(z) >= 0 # in [0,pi]
        return angle(z)
    else 
        # angle(z) is in (-pi, 0]
        # Shift it up to (pi,2pi]
        argument = 2pi + angle(z) # This is in (pi,2pi]
        if is_approx(argument, 2pi) # Map 2pi to 0
            return 0
        else
            return argument # This is now in [0,2pi)
        end
    end
end
Out[38]:
argument (generic function with 1 method)

Parameters

  • z: Number
    • Complex number whose argument is to be found.

Returns

  • argument: Number
    • Returns $\arg(z)$ in $[0,2\pi)$.

Example

In [39]:
z = 1
println("argument($z) = $(argument(z))")

z = -1-im
println("argument($z) = $(argument(z))")
argument(1) = 0.0
argument(-1 - 1im) = 3.9269908169872414

trace_contour(a, n, infty, sampleSize)

Plots the contour sectors encircled by $\Gamma_a^+$, $\Gamma_a^-$, $\Gamma_0^+$, and $\Gamma_0^-$ defined as \begin{align*} \Gamma_a^{\pm} &:= \partial(\{\lambda\in\mathbb{C}^{\pm}:\, \Re(a\lambda^n)>0\}\setminus \bigcup_{\substack{\sigma\in\mathbb{C};\\\Delta(\sigma)=0}} D(\sigma, 2\epsilon))\quad\mbox{($D$ for disk)},\\ \Gamma_0^+ &:= \bigcup_{\substack{\sigma\in\overline{\mathbb{C}^+};\\ \Delta(\sigma)=0}} C(\sigma, \epsilon)\quad\mbox{($C$ for circle)},\\ \Gamma_0^- &:= \bigcup_{\substack{\sigma\in\mathbb{C}^-;\\ \Delta(\sigma)=0}} C(\sigma, \epsilon) \end{align*} by sampling points.

In [40]:
function trace_contour(a::Number, n::Int, sampleSize::Int; infty = INFTY)
    lambdaVec = []
    for counter = 1:sampleSize
        x = rand(Uniform(-infty,infty), 1, 1)[1]
        y = rand(Uniform(-infty,infty), 1, 1)[1]
        lambda = x + y*im
        if real(a*lambda^n)>0
            append!(lambdaVec, lambda)
        end
    end
    Gadfly.plot(x=real(lambdaVec), y=imag(lambdaVec), Guide.xlabel("Re"), Guide.ylabel("Im"), Coord.Cartesian(ymin=-infty,ymax=infty, xmin=-infty, xmax=infty, fixed = true))
end
Out[40]:
trace_contour (generic function with 1 method)

Parameters

  • a: Number
    • Complex number.
  • n: Int
    • Integer $n$ in $\Gamma_a^{\pm}$.
  • infty: Number
    • Range of plot. Default to the global variable INFTY.
  • sampleSize: Int
    • Number of points to sample.

Returns

  • trace_contour: None
    • Plots the sampled points.

Example

In [41]:
n = 2
a = 1
sampleSize = 1000
trace_contour(a, n, sampleSize)
Out[41]:
Re -35 -30 -25 -20 -15 -10 -5 0 5 10 15 20 25 30 35 -30 -29 -28 -27 -26 -25 -24 -23 -22 -21 -20 -19 -18 -17 -16 -15 -14 -13 -12 -11 -10 -9 -8 -7 -6 -5 -4 -3 -2 -1 0 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 -40 -20 0 20 40 -30 -28 -26 -24 -22 -20 -18 -16 -14 -12 -10 -8 -6 -4 -2 0 2 4 6 8 10 12 14 16 18 20 22 24 26 28 30 h,j,k,l,arrows,drag to pan i,o,+,-,scroll,shift-drag to zoom r,dbl-click to reset c for coordinates ? for help ? -35 -30 -25 -20 -15 -10 -5 0 5 10 15 20 25 30 35 -30 -29 -28 -27 -26 -25 -24 -23 -22 -21 -20 -19 -18 -17 -16 -15 -14 -13 -12 -11 -10 -9 -8 -7 -6 -5 -4 -3 -2 -1 0 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 -40 -20 0 20 40 -30 -28 -26 -24 -22 -20 -18 -16 -14 -12 -10 -8 -6 -4 -2 0 2 4 6 8 10 12 14 16 18 20 22 24 26 28 30 Im
In [42]:
n = 3
a = im
sampleSize = 1000
trace_contour(a, n, sampleSize)
Out[42]:
Re -35 -30 -25 -20 -15 -10 -5 0 5 10 15 20 25 30 35 -30 -29 -28 -27 -26 -25 -24 -23 -22 -21 -20 -19 -18 -17 -16 -15 -14 -13 -12 -11 -10 -9 -8 -7 -6 -5 -4 -3 -2 -1 0 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 -40 -20 0 20 40 -30 -28 -26 -24 -22 -20 -18 -16 -14 -12 -10 -8 -6 -4 -2 0 2 4 6 8 10 12 14 16 18 20 22 24 26 28 30 h,j,k,l,arrows,drag to pan i,o,+,-,scroll,shift-drag to zoom r,dbl-click to reset c for coordinates ? for help ? -35 -30 -25 -20 -15 -10 -5 0 5 10 15 20 25 30 35 -30 -29 -28 -27 -26 -25 -24 -23 -22 -21 -20 -19 -18 -17 -16 -15 -14 -13 -12 -11 -10 -9 -8 -7 -6 -5 -4 -3 -2 -1 0 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 -40 -20 0 20 40 -30 -28 -26 -24 -22 -20 -18 -16 -14 -12 -10 -8 -6 -4 -2 0 2 4 6 8 10 12 14 16 18 20 22 24 26 28 30 Im
In [43]:
n = 3
a = -im
sampleSize = 1000
trace_contour(a, n, sampleSize)
Out[43]:
Re -35 -30 -25 -20 -15 -10 -5 0 5 10 15 20 25 30 35 -30 -29 -28 -27 -26 -25 -24 -23 -22 -21 -20 -19 -18 -17 -16 -15 -14 -13 -12 -11 -10 -9 -8 -7 -6 -5 -4 -3 -2 -1 0 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 -40 -20 0 20 40 -30 -28 -26 -24 -22 -20 -18 -16 -14 -12 -10 -8 -6 -4 -2 0 2 4 6 8 10 12 14 16 18 20 22 24 26 28 30 h,j,k,l,arrows,drag to pan i,o,+,-,scroll,shift-drag to zoom r,dbl-click to reset c for coordinates ? for help ? -35 -30 -25 -20 -15 -10 -5 0 5 10 15 20 25 30 35 -30 -29 -28 -27 -26 -25 -24 -23 -22 -21 -20 -19 -18 -17 -16 -15 -14 -13 -12 -11 -10 -9 -8 -7 -6 -5 -4 -3 -2 -1 0 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 -40 -20 0 20 40 -30 -28 -26 -24 -22 -20 -18 -16 -14 -12 -10 -8 -6 -4 -2 0 2 4 6 8 10 12 14 16 18 20 22 24 26 28 30 Im

get_distancePointLine(z, theta)

Finds the distance between a complex number and a line through the origin given by an angle in $[0,2pi)$.

In [44]:
function get_distancePointLine(z::Number, theta::Number)
    if theta >= 2pi && theta < 0
        throw(error("Theta must be in [0,2pi)"))
    else
        if is_approx(argument(z), theta)
            return 0
        else
            x0, y0 = real(z), imag(z)
            if is_approx(theta, pi/2) || is_approx(theta, 3pi/2)
                return abs(x0)
            elseif is_approx(theta, 0) || is_approx(theta, 2pi)
                return abs(y0)
            else
                k = tan(theta)
                x = (y0+1/k*x0)/(k+1/k)
                y = k*x
                distance = norm(z-(x+im*y))
                return distance
            end
        end
    end
end
Out[44]:
get_distancePointLine (generic function with 1 method)

Parameters

  • z: Number
    • Point in the complex plane.
  • theta: Number
    • Line passing the origin given by the argument of any point (besides the origin) on it.

Returns

  • get_distancePointLine: Number
    • Returns the distance between z and the line characterized by theta.

Example

In [45]:
z = 1
theta = pi/3
println("get_distancePointLine($z, $theta) = $(get_distancePointLine(z, theta))") # sqrt(3)/2
get_distancePointLine(1, 1.0471975511965976) = 0.8660254037844386

Structs

StructDefinitionError

A struct definition error type is the class of all errors in struct definitions.

In [46]:
struct StructDefinitionError <: Exception
    msg::String
end

SymLinearDifferentialOperator(symPFunctions, interval, t)

A symbolic linear differential operator of order $n$ is encoded by an $1 \times (n+1)$ array of symbolic expressions with at most one free symbol, an interval $[a,b]$, and that free symbol.

In [47]:
struct SymLinearDifferentialOperator
    # Entries in the array should be SymPy.Sym or Number. SymPy.Sym seems to be a subtype of Number, i.e., Array{Union{Number,SymPy.Sym}} returns Array{Number}. But specifying symPFunctions as Array{Number,2} gives a MethodError when the entries are Sympy.Sym objects.
    symPFunctions::Array
    interval::Tuple{Number,Number}
    t::SymPy.Sym
    SymLinearDifferentialOperator(symPFunctions::Array, interval::Tuple{Number,Number}, t::SymPy.Sym) =
    try
        symL = new(symPFunctions, interval, t)
        check_symLinearDifferentialOperator_input(symL)
        return symL
    catch err
        throw(err)
    end
end

function check_symLinearDifferentialOperator_input(symL::SymLinearDifferentialOperator)
    symPFunctions, (a,b), t = symL.symPFunctions, symL.interval, symL.t
    for symPFunc in symPFunctions
        if isa(symPFunc, SymPy.Sym)
            if size(free_symbols(symPFunc)) != (1,) && size(free_symbols(symPFunc)) != (0,)
                throw(StructDefinitionError(:"Only one free symbol is allowed in symP_k"))
            end
        elseif !isa(symPFunc, Number)
            throw(StructDefinitionError(:"symP_k should be SymPy.Sym or Number"))
        end
    end
    return true
end
Out[47]:
check_symLinearDifferentialOperator_input (generic function with 1 method)

Parameters

  • symPFunctions: Array of SymPy.Sym or Number
    • Array $[symP_0, symP_1, \ldots, symP_n]$ of length $n+1$, corresponding to the symbolic linear differential operator $symL$ of order $n$ given by $$symLx = symP_0x^{(n)} + symP_1x^{(n-1)} + \cdots + symP_{n-1}x^{(1)} + symP_n x.$$
  • interval: Tuple{Number, Number}
    • Tuple of two numbers $(a,b)$ corresponding to the real interval $[a,b]$ on which the symbolic differential operator $symL$ is defined.
  • t: SymPy.Sym
    • Free symbol in each entry of symPFunctions.

Returns

  • SymLinearDifferentialOperator
    • Returns a SymLinearDifferentialOperator of order $n$ with attributes symPFunctions, interval, and t.

Example

In [48]:
t = symbols("t")
symPFunctions = [1 t+1 t^2+t+1]
interval = (0, 1)
symL = SymLinearDifferentialOperator(symPFunctions, interval, t)
Out[48]:
SymLinearDifferentialOperator(SymPy.Sym[1 t + 1 t^2 + t + 1], (0, 1), t)

LinearDifferentialOperator(pFunctions, interval, symL)

A linear differential operator $L$ of order $n$ given by $$Lx = p_0x^{(n)} + p_1x^{(n-1)} + \cdots + p_{n-1}x^{(1)} + p_n x$$ is encoded by an $1 \times (n+1)$ array of univariate functions, an interval $[a,b]$, and its symbolic expression.

In [49]:
# symL is an attribute of L that needs to be input by the user. There are checks to make sure symL is indeed the symbolic version of L.
# Principle: Functionalities of Julia Functions >= Functionalities of SymPy. If p_k has no SymPy representation, the only consequence should be that outputs by functions that take L as arugment has no symbolic expression. E.g., we allow L.pFunctions and L.symL.pFunctions to differ.
struct LinearDifferentialOperator
    pFunctions::Array # Array of julia functions or numbers representing constant functions
    interval::Tuple{Number,Number}
    symL::SymLinearDifferentialOperator
    LinearDifferentialOperator(pFunctions::Array, interval::Tuple{Number,Number}, symL::SymLinearDifferentialOperator) =
    try
        L = new(pFunctions, interval, symL)
        check_linearDifferentialOperator_input(L)
        return L
    catch err
        throw(err)
    end
end

# Assume symFunc has only one free symbol, as required by the definition of SymLinearDifferentialOperator. 
# That is, assume the input symFunc comes from SymLinearDifferentialOperator.
function check_func_sym_equal(func::Union{Function,Number}, symFunc, interval::Tuple{Number,Number}, t::SymPy.Sym) # symFunc should be Union{SymPy.Sym, Number}, but somehow SymPy.Sym gets ignored
    (a,b) = interval
    # Randomly sample 1000 points from (a,b) and check if func and symFunc agree on them
    for i = 1:1000
        # Check endpoints
        if i == 1
            x = a
        elseif i == 2
            x = b
        else
            x = rand(Uniform(a,b), 1)[1,1]
        end
        funcEvalX = evaluate.(func, x)
        if isa(symFunc, SymPy.Sym)
            symFuncEvalX = SymPy.N(subs(symFunc,t,x))
            # N() converts SymPy.Sym to Number
            # https://docs.sympy.org/latest/modules/evalf.html
            # subs() works no matter symFunc is Number or SymPy.Sym
        else
            symFuncEvalX = symFunc
        end
        tol = set_tol(funcEvalX, symFuncEvalX)
        if !isapprox(real(funcEvalX), real(symFuncEvalX); atol = real(tol)) ||
            !isapprox(imag(funcEvalX), imag(symFuncEvalX); atol = imag(tol))
            println("x = $x")
            println("symFunc = $symFunc")
            println("funcEvalX = $funcEvalX")
            println("symFuncEvalX = $symFuncEvalX")
            return false
        end
    end
    return true
end

# Check whether the inputs of L are valid.
function check_linearDifferentialOperator_input(L::LinearDifferentialOperator)
    pFunctions, (a,b), symL = L.pFunctions, L.interval, L.symL
    symPFunctions, t = symL.symPFunctions, symL.t
    # domainC = Complex(a..b, 0..0) # Domain [a,b] represented in the complex plane
    p0 = pFunctions[1]
    # p0Chebyshev = Fun(p0, a..b) # Chebysev polynomial approximation of p0 on [a,b]
    if !check_all(pFunctions, pFunc -> (isa(pFunc, Function) || isa(pFunc, Number)))
        throw(StructDefinitionError(:"p_k should be Function or Number"))
    elseif length(pFunctions) != length(symPFunctions)
        throw(StructDefinitionError(:"Number of p_k and symP_k do not match"))
    elseif (a,b) != symL.interval
        throw(StructDefinitionError(:"Intervals of L and symL do not match"))
    # # Assume p_k are in C^{n-k}. Check whether p0 vanishes on [a,b]. 
    # # roots() in IntervalRootFinding doesn't work if p0 is sth like t*im - 2*im. Neither does find_zero() in Roots.
    # # ApproxFun.roots() 
    # elseif (isa(p0, Function) && (!isempty(roots(p0Chebyshev)) || all(x->x>b, roots(p0Chebyshev)) || all(x->x<b, roots(p0Chebyshev)) || p0(a) == 0 || p0(b) == 0)) || p0 == 0 
    #     throw(StructDefinitionError(:"p0 vanishes on [a,b]"))
    elseif !all(i -> check_func_sym_equal(pFunctions[i], symPFunctions[i], (a,b), t), 1:length(pFunctions))
        # throw(StructDefinitionError(:"symP_k does not agree with p_k on [a,b]"))
        warn("symP_k does not agree with p_k on [a,b]") # Make this a warning instead of an error because the functionalities of Julia Functions may be more than those of SymPy objects; we do not want to compromise the functionalities of LinearDifferentialOperator because of the restrictions on SymPy.
    else
        return true
    end
end
Out[49]:
check_linearDifferentialOperator_input (generic function with 1 method)

Parameters

  • pFunctions: Array of Function or Number
    • Array $[p_0, p_1, \ldots, p_n]$ of length $n+1$, corresponding to the linear differential operator $L$ of order $n$ given by $$Lx = p_0x^{(n)} + p_1x^{(n-1)} + \cdots + p_{n-1}x^{(1)} + p_n x.$$
  • interval: Tuple{Number, Number}
    • Tuple of two numbers (a, b) corresponding to the real interval $[a,b]$ on which the differential operator $L$ is defined.
  • symL: SymLinearDifferentialOperator
    • Symbolic linear differential operator corresponding to $L$.

Returns

  • LinearDifferentialOperator
    • Returns a LinearDifferentialOperator of order $n$ with attributes pFunctions, interval, and symL.

Example

In [50]:
t = symbols("t")
symPFunctions = [1 t+1 t^2+t+1]
interval = (0, 1)
symL = SymLinearDifferentialOperator(symPFunctions, interval, t)
# Direct construction
pFunctions = [t->1 t->t+1 t->t^2+t+1]
L = LinearDifferentialOperator(pFunctions, interval, symL)
Out[50]:
LinearDifferentialOperator(Function[#20 #21 #22], (0, 1), SymLinearDifferentialOperator(SymPy.Sym[1 t + 1 t^2 + t + 1], (0, 1), t))

VectorBoundaryForm(M, N)

A set of homogeneous boundary conditions in vector form $$Ux = \begin{bmatrix}U_1\\\vdots\\ U_m\end{bmatrix}x = \begin{bmatrix}\sum_{j=1}^n M_{1j}x^{(j-1)}(a) + N_{1j}x^{(j-1)}(b)\\\vdots\\ \sum_{j=1}^n M_{mj}x^{(j-1)}(a) + N_{mj}x^{(j-1)}(b)\end{bmatrix} = \begin{bmatrix}0\\\vdots\\ 0\end{bmatrix}$$ is encoded by an ordered pair of two linearly independent $m\times n$ matrices $(M, N)$ where $$M = \begin{bmatrix}M_{11} & \cdots & M_{1n}\\ \vdots & \ddots & \vdots\\ M_{m1} & \cdots & M_{mn}\end{bmatrix},\quad N = \begin{bmatrix}N_{11} & \cdots & N_{1n}\\ \vdots & \ddots & \vdots\\ N_{m1} & \cdots & N_{mn}\end{bmatrix}.$$

In [51]:
struct VectorBoundaryForm
    M::Array # Why can't I specify Array{Number,2} without having a MethodError?
    N::Array
    VectorBoundaryForm(M::Array, N::Array) =
    try
        U = new(M, N)
        check_vectorBoundaryForm_input(U)
        return U
    catch err
        throw(err)
    end
end

# Check whether the input matrices that characterize U are valid
function check_vectorBoundaryForm_input(U::VectorBoundaryForm)
    # M, N = U.M, U.N
    # Avoid Inexact() error when taking rank()
    M = convert(Array{Complex}, U.M)
    N = convert(Array{Complex}, U.N)
    if !(check_all(U.M, x -> isa(x, Number)) && check_all(U.N, x -> isa(x, Number)))
        throw(StructDefinitionError(:"Entries of M, N should be Number"))
    elseif size(U.M) != size(U.N)
        throw(StructDefinitionError(:"M, N dimensions do not match"))
    elseif size(U.M)[1] != size(U.M)[2]
        throw(StructDefinitionError(:"M, N should be square matrices"))
    elseif rank(hcat(M, N)) != size(M)[1] # rank() throws weird "InexactError()" when taking some complex matrices
        throw(StructDefinitionError(:"Boundary operators not linearly independent"))
    else
        return true
    end
end
Out[51]:
check_vectorBoundaryForm_input (generic function with 1 method)

Parameters

  • M, N: Array of Number
    • Two linearly independent numeric matrices of the same dimension.

Returns

  • VectorBoundaryForm
    • Returns a VectorBoundaryForm with attributes M and N.

Example

In [52]:
M = [1 0; 2 0]
N = [0 2; 0 1]
U = VectorBoundaryForm(M, N)
Out[52]:
VectorBoundaryForm([1 0; 2 0], [0 2; 0 1])

Construct adjoint boundary conditions

Constructs a valid adjoint boundary condition from a given (homogeneous) boundary condition based on Chapter 11 in Theory of Ordinary Differential Equations (Coddington & Levinson).

get_L(symL)

Constructs a LinearDifferentialOperator from a given SymLinearDifferentialOperator.

In [53]:
function get_L(symL::SymLinearDifferentialOperator)
    symPFunctions, (a,b), t = symL.symPFunctions, symL.interval, symL.t
    if check_all(symPFunctions, x->!isa(x, SymPy.Sym))
        pFunctions = symPFunctions
    else
        pFunctions = sym_to_func.(symPFunctions)
    end
    L = LinearDifferentialOperator(pFunctions, (a,b), symL)
    return L
end
Out[53]:
get_L (generic function with 1 method)

Parameters

  • symL: SymLinearDifferentialOperator
    • Symbolic linear differential operator to be converted.

Returns

  • get_L: LinearDifferentialOperator
    • Returns the linear differential operator converted from symL.

Example

In [54]:
t = symbols("t")
symPFunctions = [1 t+1 t^2+t+1]
interval = (0, 1)
symL = SymLinearDifferentialOperator(symPFunctions, interval, t)
L = get_L(symL)
Out[54]:
LinearDifferentialOperator(#func#10{SymPy.Sym}[func func func], (0, 1), SymLinearDifferentialOperator(SymPy.Sym[1 t + 1 t^2 + t + 1], (0, 1), t))

get_URank(U)

Computes the rank of a vector boundary form $U$ by computing the equivalent $\text{rank}(M:N)$, where $M, N$ are the matrices associated with $U$ and $$(M:N) = \begin{bmatrix}M_{11} & \cdots & M_{1n} & N_{11} & \cdots & N_{1n}\\ \vdots & \ddots & \vdots & \vdots & \ddots & \vdots\\ M_{m1} & \cdots & M_{mn} & N_{m1} & \cdots & N_{mn}\end{bmatrix}.$$

In [55]:
function get_URank(U::VectorBoundaryForm)
    # Avoid InexactError() when taking hcat() and rank()
    M = convert(Array{Complex}, U.M)
    N = convert(Array{Complex}, U.N)
    MHcatN = hcat(M, N)
    return rank(MHcatN)
end
Out[55]:
get_URank (generic function with 1 method)

Parameters

  • U: VectoBoundaryForm
    • Vector boundary form whose rank is to be computed.

Returns

  • get_URank: Number
    • Returns the rank of U.

Example

In [56]:
M = [1 0; 2 0]
N = [0 2; 0 1]
U = VectorBoundaryForm(M, N)
get_URank(U)
Out[56]:
2

get_Uc(U)

Given vector boundary form $U = \begin{bmatrix}U_1\\ \vdots\\ U_m\end{bmatrix}$ of rank $m$, finds a complementary form $U_c = \begin{bmatrix}U_{m+1}\\ \vdots\\ U_{2n}\end{bmatrix}$ of rank $2n-m$ such that $\begin{bmatrix}U_1\\ \vdots\\ U_{2n}\end{bmatrix}$ has rank $2n$.

In [57]:
function get_Uc(U::VectorBoundaryForm)
    try
        check_vectorBoundaryForm_input(U)
        n = get_URank(U)
        I = complex(eye(2*n))
        M, N = U.M, U.N
        MHcatN = hcat(M, N)
        # Avoid InexactError() when taking rank()
        mat = convert(Array{Complex}, MHcatN)
        for i = 1:(2*n)
            newMat = vcat(mat, I[i:i,:])
            newMat = convert(Array{Complex}, newMat)
            if rank(newMat) == rank(mat) + 1
                mat = newMat
            end
        end
        UcHcat = mat[(n+1):(2n),:]
        Uc = VectorBoundaryForm(UcHcat[:,1:n], UcHcat[:,(n+1):(2n)])
        return Uc
    catch err
        return err
    end
end
Out[57]:
get_Uc (generic function with 1 method)

Parameters

  • U: VectoBoundaryForm
    • Vector boundary form whose complementary boundary form is to be found.

Returns

  • get_Uc: VectorBoundaryForm
    • Returns a vectory boundary form complementary to U.

Example

In [58]:
M = [1 0; 2 0]
N = [0 2; 0 1]
U = VectorBoundaryForm(M, N)
Uc = get_Uc(U)
Out[58]:
VectorBoundaryForm(Complex[0.0+0.0im 1.0+0.0im; 0.0+0.0im 0.0+0.0im], Complex[0.0+0.0im 0.0+0.0im; 1.0+0.0im 0.0+0.0im])

get_H(U, Uc)

Given a vector boundary form $U$ and a complementary vector boundary form $U_c$, constructs $$H = \begin{bmatrix}M&N\\ M_c & N_c\end{bmatrix},$$ where $M, N$ are the matrices associated with $U$ and $M_c, N_c$ are associated with $U_c$.

In [59]:
function get_H(U::VectorBoundaryForm, Uc::VectorBoundaryForm)
    MHcatN = hcat(convert(Array{Complex}, U.M), convert(Array{Complex}, U.N))
    McHcatNc = hcat(convert(Array{Complex}, Uc.M), convert(Array{Complex}, Uc.N))
    H = vcat(MHcatN, McHcatNc)
    return H
end
Out[59]:
get_H (generic function with 1 method)

Parameters

  • U: VectorBoundaryForm
    • Vector boundary form.
  • Uc: VectorBoundaryForm
    • Vector boundary form complementary to U.

Returns

  • get_H: Array
    • Returns the matrix $H$ defined above.

Example

In [60]:
M = [1 0; 2 0]
N = [0 2; 0 1]
U = VectorBoundaryForm(M, N)
Uc = get_Uc(U)
get_H(U, Uc)
Out[60]:
4×4 Array{Complex,2}:
   1+0im      0+0im      0+0im      2+0im  
   2+0im      0+0im      0+0im      1+0im  
 0.0+0.0im  1.0+0.0im  0.0+0.0im  0.0+0.0im
 0.0+0.0im  0.0+0.0im  1.0+0.0im  0.0+0.0im

get_pDerivMatrix(L; symbolic)

Given a LinearDifferentialOperator L where L.pFunctions is the array $$[p_0, p_1, \ldots, p_n],$$ constructs an $n\times n$ matrix whose $(i+1)(j+1)$-entry is a function corresponding to the $j$th derivative of $p_i$: $$\begin{bmatrix}p_0 & \cdots & p_0^{(n-1)}\\ \vdots & \ddots & \vdots\\ p_{n-1} & \cdots & p_{n-1}^{(n-1)}\end{bmatrix}.$$

In [61]:
function get_pDerivMatrix(L::LinearDifferentialOperator; symbolic = false)
    if symbolic
        symL = L.symL
        symPFunctions, t = symL.symPFunctions, symL.t
        n = length(symPFunctions)-1
        symPDerivMatrix = Array{SymPy.Sym}(n,n)
        pFunctionSymbols = symPFunctions
        for i in 0:(n-1)
            for j in 0:(n-1)
                index, degree = i, j
                symP = pFunctionSymbols[index+1]
                # If symP is not a Sympy.Sym object (e.g., is a Number instead), then cannot use get_deriv()
                if !isa(symP, SymPy.Sym)
                    if degree > 0
                        symPDeriv = 0
                    else
                        symPDeriv = symP
                    end
                else
                    symPDeriv = get_deriv(symP, degree)
                end
                symPDerivMatrix[i+1,j+1] = symPDeriv
            end
        end
        return symPDerivMatrix
    else
        symPDerivMatrix = get_pDerivMatrix(L; symbolic = true)
        n = length(L.pFunctions)-1
        pDerivMatrix = sym_to_func.(symPDerivMatrix)
    end
    return pDerivMatrix
end
Out[61]:
get_pDerivMatrix (generic function with 1 method)

Parameters

  • L: LinearDifferentialOperator
    • Linear differential operator whose pDerivMatrix is to be constructed.
  • symbolic*: Bool
    • Boolean indicating whether the output is symbolic.

Returns

  • get_pDerivMatrix: Array of Function, Number or SymPy.Sym
    • Returns an $n\times n$ matrix whose $(i+1)(j+1)$-entry is
      • the $j$th derivative of $p_i$ (L.pFunctions[i]) if symbolic = false, or
      • the symbolic expression of the $j$th derivative of $p_i$ (L.symL.symPFunctions[i]) if symbolic = true.

Example

In [62]:
t = symbols("t")
symPFunctions = [1 t+1 t^2+t+1]
interval = (0, 1)
symL = SymLinearDifferentialOperator(symPFunctions, interval, t)
# pFunctions = [t->1 t->t+1 t->t^2+t+1]
# L = LinearDifferentialOperator(pFunctions, interval, symL)
L = get_L(symL)

tVal = 2
pDerivMatrix = get_pDerivMatrix(L; symbolic = false)
println("pDerivMatrix($tVal) = $(evaluate.(pDerivMatrix,tVal))")

symPDerivMatrix = get_pDerivMatrix(L; symbolic = true)
pDerivMatrix(2) = [1 0; 3 1]
Out[62]:
\begin{bmatrix}1&0\\t + 1&1\end{bmatrix}

get_Bjk(L, j, k; symbolic, pDerivMatrix)

Given a LinearDifferentialOperator L of order $n$, for $j, k \in \{1,\ldots,n\}$, computes $B_{jk}$ defined as $$B_{jk}(t) := \sum_{\ell=j-1}^{n-k}\binom{\ell}{j-1}p^{(\ell-j+1)}_{n-k-\ell}(t)(-1)^\ell.$$

In [63]:
function get_Bjk(L::LinearDifferentialOperator, j::Int, k::Int; symbolic = false, pDerivMatrix = get_pDerivMatrix(L; symbolic = symbolic))
    n = length(L.pFunctions)-1
    if j <= 0 || j > n || k <= 0 || k > n
        throw("j, k should be in {1, ..., n}")
    end
    sum = 0
    if symbolic
        symPDerivMatrix = get_pDerivMatrix(L; symbolic = true)
        for l = (j-1):(n-k)
            summand = binomial(l, j-1) * symPDerivMatrix[n-k-l+1, l-j+1+1] * (-1)^l
            sum += summand
        end
    else
        for l = (j-1):(n-k)
            summand = mult_func(binomial(l, j-1) * (-1)^l, pDerivMatrix[n-k-l+1, l-j+1+1])
            sum = add_func(sum, summand)
        end
    end
    return sum
end
Out[63]:
get_Bjk (generic function with 1 method)

Parameters

  • L: LinearDifferentialOperator
    • Linear differential operator whose L.pFunctions are to become the $p_{n-k-l}^{l-j+1}$ in $B_{jk}(t)$.
  • j, k: Int
    • Integers corresponding to the $j$ and $k$ in $B_{jk}$.
  • symbolic*: Bool
    • Boolean indicating whether the output is symbolic.
  • pDerivMatrix*: Array
    • If symbolic = false, an $n\times n$ matrix whose $(i+1)(j+1)$-entry is the $j$th derivative of $p_i$ (L.pFunctions[i]) implemented as a Function, Number, or SymPy.Sym. Default to the output of get_pDerivMatrix(L).

Returns

  • get_Bjk: SymPy.Sym, Function, or Number
    • Returns $B_{jk}(t)$ defined above,
      • as Function if symbolic = false, or
      • as SymPy.Sym object if symbolic = true, where each $p_i$ is the generic expression $p_i(t)$.

Example

In [64]:
t = symbols("t")
symPFunctions = [1 t+1 t^2+t+1]
interval = (0, 1)
symL = SymLinearDifferentialOperator(symPFunctions, interval, t)

# pFunctions = [t->1 t->t+1 t->t^2+t+1]
# L = LinearDifferentialOperator(pFunctions, interval, symL)
L = get_L(symL)

# pDerivMatrix = [1 0; t->1+t t->1]
j, k = 1, 1
BjkSym = get_Bjk(L, j, k; symbolic = true)
Out[64]:
$$t + 1$$
In [65]:
tVal = 1
Bjk = get_Bjk(L, j, k; symbolic = false)
println("Bjk($tVal) = $(Bjk(tVal))")
println("BjkSym($tVal) = $(evaluate.(BjkSym, tVal))")
Bjk(1) = 2
BjkSym(1) = 2

get_B(L; symbolic, pDerivMatrix)

Given a LinearDifferentialOperator L where L.pFunctions is the array $$[p_0, p_1, \ldots, p_n],$$ constructs the matrix $B(t)$ whose $ij$-entry is given by $$B_{jk}(t) := \sum_{\ell=j-1}^{n-k}\binom{\ell}{j-1}p^{(\ell-j+1)}_{n-k-\ell}(t)(-1)^\ell.$$

In [66]:
function get_B(L::LinearDifferentialOperator; symbolic = false, pDerivMatrix = get_pDerivMatrix(L; symbolic = symbolic))
    n = length(L.pFunctions)-1
    B = Array{Union{Function, Number, SymPy.Sym}}(n,n)
    for j = 1:n
        for k = 1:n
            B[j,k] = get_Bjk(L, j, k; symbolic = symbolic, pDerivMatrix = pDerivMatrix)
        end
    end
    return B
end
Out[66]:
get_B (generic function with 1 method)

Parameters

  • L: LinearDifferentialOperator
    • Linear differential operator whose L.pFunctions are to become the $p_{n-k-l}^{l-j+1}$ in $B_{jk}(t)$.
  • symbolic*: Bool
    • Boolean indicating whether the output is symbolic.
  • substitute*: Bool
    • If symbolic = true, boolean indicating whether to substitute the symbolic expression of $p_i$ in L.pFunctions for the generic expression $p_i(t)$ created using SymFunction("pi")(t). If symbolic = false, the value of substitute does not matter.
  • pDerivMatrix*: Array
    • If symbolic = false, the non-symbolic version of symPDerivMatrix, i.e., an $n\times n$ matrix whose $(i+1)(j+1)$-entry is the $j$th derivative of $p_i$ (L.pFunctions[i]) implemented as a Function or Number.

Returns

  • get_B: Array of Function, SymPy.Sym, or Number
    • Returns $B(t)$ defined above, where $B_{jk}(t)$ is
      • Function if symbolic = false, or
      • SymPy.Sym object if symbolic = true, where each $p_i$ is
        • the generic expression $p_i(t)$ if substitute = false, or
        • the symbolic expression of $p_i(t)$ (L.symL.symPFunctions[i]) if substitute = true.

Example

In [67]:
t = symbols("t")
symPFunctions = [1 t+1 t^2+t+1]
interval = (0, 1)
symL = SymLinearDifferentialOperator(symPFunctions, interval, t)
L = get_L(symL)

BSym = get_B(L; symbolic = true)
# Only Array{SymPy.Sym} would be automatically pretty-printed
# Enfore pretty-printing
prettyPrint.(BSym)
Out[67]:
\begin{bmatrix}t + 1&1\\-1&0\end{bmatrix}
In [68]:
B = get_B(L; symbolic = false)
tVal = 1
println("B($tVal) = $(evaluate.(B, tVal))")
println("BSym($tVal) = $(evaluate.(BSym, tVal))")
B(1) = [2 1; -1 0]
BSym(1) = Number[2 1; -1 0]

get_BHat(L, B)

Given a LinearDifferentialOperator L where L.pFunctions is the array $$[p_0, p_1, \ldots, p_n]$$ and L.interval is $[a,b]$, constructs $\hat{B}$ defined as the block matrix $$\hat{B}:=\begin{bmatrix}-B(a) & 0_n\\0_n & B(b)\end{bmatrix}.$$

In [69]:
function get_BHat(L::LinearDifferentialOperator, B::Array)
#     if check_any(B, x->isa(x, SymPy.Sym))
#         throw("Entries of B should be Function or Number")
#     end
    pFunctions, (a,b) = L.pFunctions, L.interval
    n = length(pFunctions)-1
    BHat = Array{Complex}(2n,2n)
    BEvalA = evaluate.(B, a)
    BEvalB = evaluate.(B, b)
    BHat[1:n,1:n] = -BEvalA
    BHat[(n+1):(2n),(n+1):(2n)] = BEvalB
    BHat[1:n, (n+1):(2n)] = 0
    BHat[(n+1):(2n), 1:n] = 0
    return BHat
end
Out[69]:
get_BHat (generic function with 1 method)

Parameters

  • L: LinearDifferentialOperator
    • Linear differential operator whose L.pFunctions are to become the $p_{n-k-l}^{l-j+1}$ in $B_{jk}(t)$.
  • B: Array of Number
    • Output of get_B(L; symbolic = false).

Returns

  • get_BHat: Array of Number
    • Returns $\hat{B}$ defined above.

Example

In [70]:
t = symbols("t")
symPFunctions = [1 t+1 t^2+t+1]
interval = (0, 1)
symL = SymLinearDifferentialOperator(symPFunctions, interval, t)
L = get_L(symL)

B = get_B(L; symbolic = false)
get_BHat(L, B)
Out[70]:
4×4 Array{Complex,2}:
 -1+0im  -1+0im   0+0im  0+0im
  1+0im   0+0im   0+0im  0+0im
  0+0im   0+0im   2+0im  1+0im
  0+0im   0+0im  -1+0im  0+0im

get_J(BHat, H)

Given $\hat{B}$ and $H$, constructs $J$ defined as $$J:=(\hat{B}H^{-1})^\star$$ where $^*$ denotes conjugate transpose.

In [71]:
function get_J(BHat, H)
    n = size(H)[1]
    H = convert(Array{Complex}, H)
    J = (BHat * inv(H))'
    # J = convert(Array{Complex}, J)
    return J
end
Out[71]:
get_J (generic function with 1 method)

Parameters

  • BHat: Array
    • Output of get_BHat().
  • H: Array
    • Output of get_H().

Returns

  • get_J: Array
    • Returns $J$ defined above.

Example

In [72]:
t = symbols("t")
symPFunctions = [1 t+1 t^2+t+1]
interval = (0, 1)
symL = SymLinearDifferentialOperator(symPFunctions, interval, t)
L = get_L(symL)

B = get_B(L; symbolic = false)
BHat = get_BHat(L, B)

M = [1 0; 2 0]
N = [0 2; 0 1]
U = VectorBoundaryForm(M, N)
Uc = get_Uc(U)
H = get_H(U, Uc)

get_J(BHat, H)
Out[72]:
4×4 Array{Complex,2}:
  0.333333-0.0im  -0.333333-0.0im   0.666667-0.0im   0.0-0.0im
 -0.666667-0.0im   0.666667-0.0im  -0.333333-0.0im   0.0-0.0im
      -1.0-0.0im        0.0-0.0im        0.0-0.0im   0.0-0.0im
       0.0-0.0im        0.0-0.0im        2.0-0.0im  -1.0-0.0im

get_adjointCand(J)

Given $J$, constructs a candidate adjoint vector boundary form $U^+$ from two matrices $P^\star$, $Q^\star$, which are the lower-left $n\times n$ submatrix of $J$, and the lower-right $n\times n$ submatrix of $J$, respectively.

In [73]:
function get_adjointCand(J)
    n = convert(Int, size(J)[1]/2)
    J = convert(Array{Complex}, J)
    PStar = J[(n+1):2n,1:n]
    QStar = J[(n+1):2n, (n+1):2n]
    adjointU = VectorBoundaryForm(PStar, QStar)
    return adjointU
end
Out[73]:
get_adjointCand (generic function with 1 method)

Parameters

  • J: Array
    • Output of get_J.

Returns

  • get_adjoint: VectorBoundaryForm
    • Returns $U^+$ defined above.

Example

In [74]:
t = symbols("t")
symPFunctions = [1 t+1 t^2+t+1]
interval = (0, 1)
symL = SymLinearDifferentialOperator(symPFunctions, interval, t)
L = get_L(symL)

B = get_B(L; symbolic = false)
BHat = get_BHat(L, B)

M = [1 0; 2 0]
N = [0 2; 0 1]
U = VectorBoundaryForm(M, N)
Uc = get_Uc(U)
H = get_H(U, Uc)

J = get_J(BHat, H)
adjoint = get_adjointCand(J)
Out[74]:
VectorBoundaryForm(Complex[-1.0-0.0im 0.0-0.0im; 0.0-0.0im 0.0-0.0im], Complex[0.0-0.0im 0.0-0.0im; 2.0-0.0im -1.0-0.0im])

get_xi(L; symbolic, xSym)

Given a LinearDifferentialOperator L of order $n$ in the differential equation $Lx=0$, constructs $\xi(t)$, which is defined as the vector of derivatives of $x(t)$ $$\xi(t) := \begin{bmatrix}x(t)\\ x^{(1)}(t)\\ x^{(2)}(t)\\ \vdots\\ x^{(n-1)}(t)\end{bmatrix}.$$

In [75]:
function get_xi(L::LinearDifferentialOperator; symbolic = true, xSym= nothing)
    if symbolic
        t = L.symL.t
        n = length(L.pFunctions)-1
        symXi = Array{SymPy.Sym}(n,1)
        if isa(xSym, Void)
            throw(error("xSymrequired"))
        else
            for i = 1:n
                symXi[i] = get_deriv(xSym, i-1)
            end
            return symXi
        end
    else
        if isa(xSym, Void)
            throw(error("xSym required"))
        elseif !isa(xSym, SymPy.Sym) && !isa(xSym, Number)
            throw(error("xSym should be SymPy.Sym or Number"))
        else
            symXi = get_xi(L; symbolic = true, xSym = xSym)
            xi = sym_to_func.(symXi)
        end
    end
end
Out[75]:
get_xi (generic function with 1 method)

Parameters

  • L: LinearDifferentialOperator
    • Linear differential operator in the differential equation $Lx=0$; derivatives of $x(t)$ will be entries of $\xi(t)$.
  • symbolic: Bool
    • Boolean indicating whether the output is symbolic.
  • substitute*: Bool
    • If symbolic = true, boolean indicating whether to substitute the symbolic expression of $x(t)$ for the generic expression created using SymFunction.
  • xSym*: SymPy.Sym
    • If substitute = true, symbolic expression of $x(t)$ to replace the generic expression with.

Returns

  • get_xi: Array of SymPy.Sym
    • Returns an array whose $i$th entry is
      • the generic expression $\displaystyle\frac{d^{i-1}}{dt^{i-1}}x(t)$ if substitute = false, or
      • the symbolic expression of the ($i-1$)th derivative of $x(t)$ if substitute = true.

Example

In [76]:
t = symbols("t")
symPFunctions = [1 t+1 t^2+t+1]
interval = (0, 1)
symL = SymLinearDifferentialOperator(symPFunctions, interval, t)
L = get_L(symL)
Out[76]:
LinearDifferentialOperator(#func#10{SymPy.Sym}[func func func], (0, 1), SymLinearDifferentialOperator(SymPy.Sym[1 t + 1 t^2 + t + 1], (0, 1), t))
In [77]:
xSym = t^2+2t
symXi = get_xi(L; symbolic = true, xSym = xSym)
Out[77]:
\begin{bmatrix}t^{2} + 2 t\\2 t + 2\end{bmatrix}
In [78]:
xi = get_xi(L; symbolic=false, xSym = xSym)
tVal = 1
println("xi($tVal) = $(evaluate.(xi, tVal))")
println("symXi($tVal) = $(evaluate.(symXi, tVal))")
xi(1) = [3; 4]
symXi(1) = [3; 4]

get_Ux(L, U, xSym)

Given a LinearDifferentialOperator L and a VectorBoundaryForm U, constructs the left hand side $$Ux = M\xi(a) + N\xi(b)$$ of the homogeneous boundary condition $Ux=0$, where \begin{align*} Ux &= \begin{bmatrix} \sum_{j=1}^n (M_{1j}x^{(j-1)}(a) + N_{1j}x^{(j-1)}(b))\\ \vdots\\ \sum_{j=1}^n (M_{mj}x^{(j-1)}(a) + N_{mj}x^{(j-1)}(b)) \end{bmatrix}\\ &= \begin{bmatrix} M_{11} & \cdots & M_{1n} & N_{11} & \cdots & N_{1n}\\ \vdots & & \vdots & \vdots & & \vdots\\ M_{m1} & \cdots & M_{mn} & N_{m1} & \cdots & N_{mn} \end{bmatrix} \begin{bmatrix}x(a)\\\vdots\\x^{(n-1)}(a)\\ x(b)\\\vdots\\x^{(n-1)}(b)\end{bmatrix}\\ &= (M:N)\begin{bmatrix} \xi(a)\\ \xi(b) \end{bmatrix}. \end{align*}

In [79]:
function get_Ux(L::LinearDifferentialOperator, U::VectorBoundaryForm, xSym)
    (a, b) = L.interval
    xi = get_xi(L; symbolic = false, xSym = xSym)
    xiEvalA = evaluate.(xi, a)
    xiEvalB = evaluate.(xi, b)
    M, N = U.M, U.N
    Ux = M*xiEvalA + N*xiEvalB
    return Ux
end
Out[79]:
get_Ux (generic function with 1 method)

Parameters

  • L: LinearDifferentialOperator
    • Linear differential operator in the differential equation $Lx=0$; derivatives of $x(t)$ will be entries of $\xi(t)$.
  • U: VectorBoundaryForm
    • Vector boundary form in the boundary condition $Ux$.
  • symX*: SymPy.Sym
    • Symbolic expression of $x(t)$ whose derivatives will be entries of $\xi(t)$.

Returns

  • get_boundaryCondition: Array of Number
    • Returns the $Ux$ in the homogeneous boundary condition $Ux=0$ defined above.

Example

In [80]:
t = symbols("t")
symPFunctions = [1 t+1 t^2+t+1]
interval = (0, 1)
symL = SymLinearDifferentialOperator(symPFunctions, interval, t)
L = get_L(symL)
M = [1 0; 2 0]
N = [0 2; 0 1]
U = VectorBoundaryForm(M, N)

xSym = t^2+2t
Ux = get_Ux(L, U, xSym)
println("U($symX) = $Ux")
UndefVarError: symX not defined

Stacktrace:
 [1] include_string(::String, ::String) at .\loading.jl:522

check_adjoint(L, U, adjointU, B)

Given a boundary value problem $$Lx = 0,\quad Ux=0$$ with linear differential operator $L$ and vector boundary form $U$, a candidate adjoint vector boundary form $U^+$, and the matrix $B$ associated with $L$, checks whether the boundary condition $$U^+x = 0$$ is indeed adjoint to the boundary condition $$Ux=0.$$

In [81]:
function check_adjoint(L::LinearDifferentialOperator, U::VectorBoundaryForm, adjointU::VectorBoundaryForm, B::Array)
    (a, b) = L.interval
    M, N = U.M, U.N
    P, Q = (adjointU.M)', (adjointU.N)'
    # Avoid InexactError() when taking inv()
    BEvalA = convert(Array{Complex}, evaluate.(B, a))
    BEvalB = convert(Array{Complex}, evaluate.(B, b))
    left = M * inv(BEvalA) * P
    right = N * inv(BEvalB) * Q
#     println("left = $left")
#     println("right = $right")
    tol = set_tol(left, right)
    return all(i -> isapprox(left[i], right[i]; atol = tol), 1:length(left)) # Can't use == to deterimine equality because left and right are arrays of floats
end
Out[81]:
check_adjoint (generic function with 1 method)

Parameters

  • L: LinearDifferentialOperator
    • Linear differential operator in the differential equation $Lx=0$.
  • U: VectorBoundaryForm
    • Vector boundary form in the boundary condition $Ux=0$.
  • adjointU: VectorBoundaryForm
    • Vector boundary form in the candidate adjoint boundary condition $U^+x=0$.
  • B: Array of Number
    • Output of get_B(L).

Returns

  • check_adjoint: Bool
    • Returns
      • true if adjointU is indeed adjoint to U, or
      • false otherwise.

Example

In [82]:
t = symbols("t")
symPFunctions = [1 t+1 t^2+t+1]
interval = (0, 1)
symL = SymLinearDifferentialOperator(symPFunctions, interval, t)
L = get_L(symL)
M = [1 0; 2 0]
N = [0 2; 0 1]
# M = [3.9 5.4; 1+2*im 2]
# N = [4.7 8.1 + im; 0.5*im 10]
U = VectorBoundaryForm(M, N)
Uc = get_Uc(U)

# Non-symbolic
B = get_B(L)
BHat = get_BHat(L, B)
H = get_H(U, Uc)
J = get_J(BHat, H)
adjointU = get_adjointCand(J)

check_adjoint(L, U, adjointU, B)
Out[82]:
true

get_adjointU(L, U, pDerivMatrix)

Given a boundary value problem $$Lx = p_0x^{(n)} + p_1x^{(n-1)} + \cdots + p_{n-1}x^{(1)} + p_n x = 0,\quad Ux=0$$ with linear differential operator $L$ and vector boundary form $U$, an $n\times n$ matrix of derivatives $$\begin{bmatrix}p_0 & \cdots & p_0^{(n-1)}\\ \vdots & \ddots & \vdots\\ p_{n-1} & \cdots & p_{n-1}^{(n-1)}\end{bmatrix},$$ construct $U^+$ such that the boundary condition $U^+=0$ is adjoint to the original boundary condition $Ux=0$.

In [83]:
function get_adjointU(L::LinearDifferentialOperator, U::VectorBoundaryForm, pDerivMatrix=get_pDerivMatrix(L))
    B = get_B(L; pDerivMatrix = pDerivMatrix)
    BHat = get_BHat(L, B)
    Uc = get_Uc(U)
    H = get_H(U, Uc)
    J = get_J(BHat, H)
    adjointU = get_adjointCand(J)
    if check_adjoint(L, U, adjointU, B)
        return adjointU
    else
        throw(error("Adjoint found not valid"))
    end
end
Out[83]:
get_adjointU (generic function with 2 methods)

Parameters

  • L: LinearDifferentialOperator
    • Linear differential operator in the differential equation $Lx=0$.
  • U: VectorBoundaryForm
    • Vectory boundary form in the boundary condition $Ux=0$.
  • pDerivMatrix: Array of Function, Number, or SymPy.#
    • An $n\times n$ matrix defined above, which can be
      • output of get_pDerivMatrix (SymPy.#), or
      • user input.

Returns

  • get_adjointU: VectorBoundaryForm
    • Returns a valid vector boundary form $U^+$ such that the boundary condition $U^+x=0$ is adjoint to $Ux=0$.

Example

In [84]:
t = symbols("t")
symPFunctions = [1 t+1 t^2+t+1]
interval = (0, 1)
symL = SymLinearDifferentialOperator(symPFunctions, interval, t)
# pFunctions = [t->1 t->t+1 t->t^2+t+1]
# L = LinearDifferentialOperator(pFunctions, interval, symL)
L = get_L(symL)
M = [1 0; 2 0]
N = [0 2; 0 1]
U = VectorBoundaryForm(M, N)

adjointU = get_adjointU(L, U)
Out[84]:
VectorBoundaryForm(Complex[-1.0-0.0im 0.0-0.0im; 0.0-0.0im 0.0-0.0im], Complex[0.0-0.0im 0.0-0.0im; 2.0-0.0im -1.0-0.0im])

Approximate roots of exponential polynomial

Helps user to find the roots of an exponential polynomial $\Delta(\lambda)$ where $\lambda\in\mathbb{C}$ by visualizing the roots as the intersections of the level curves $\Re(\Delta) = 0$ and $\Im(\Delta) = 0$.

separate_real_imaginary(delta)

Separates real and imaginary parts of the symbolic expression of $\Delta(\lambda)$, an exponential polynomial in one variable.

separate_real_imaginary_exp(expr)

Helper function that deals with the case where the toplevel operation is exponentiation.

In [85]:
# although the function body is the same as "power" and "others", this case is isolated because negative exponents, e.g., factor_list(e^(-im*x)), give PolynomialError('a polynomial expected, got exp(-I*x)',), while factor_list(cos(x)) runs normally
function separate_real_imaginary_exp(expr::SymPy.Sym)
    result = real(expr) + im*imag(expr)
    return result
end
Out[85]:
separate_real_imaginary_exp (generic function with 1 method)

Parameters

  • expr: SymPy.Sym
    • Symbolic expression in $x+iy$ whose toplevel operation is exponentiation, i.e., SymPy.func(expr) = SymPy.func(sympyExpExpr).

Returns

  • separate_real_imaginary_exp: SymPy.Sym
    • Returns a symbolic expression whose real and imaginary parts are separated.

Example

In [86]:
x = symbols("x", real = true)
y = symbols("y", real = true)
expr = e^(x+im*y)
println("func($expr) = $(SymPy.func(expr))")
separate_real_imaginary_exp(expr)
func(exp(x + I*y)) = exp
Out[86]:
$$i e^{x} \sin{\left (y \right )} + e^{x} \cos{\left (y \right )}$$

separate_real_imaginary_power(expr)

Helper function that deals with the case where the toplevel operation is power.

In [87]:
# we won't be dealing with cases like x^(x^x)
function separate_real_imaginary_power(expr::SymPy.Sym)
    result = real(expr) + im*imag(expr)
    return result
end
Out[87]:
separate_real_imaginary_power (generic function with 1 method)

Parameters

  • expr: SymPy.Sym
    • Symbolic expression in $x+iy$ whose toplevel operation is power, i.e., SymPy.func(expr) = SymPy.func(sympyPowerExpr).

Returns

  • separate_real_imaginary_power: SymPy.Sym
    • Returns a symbolic expression whose real and imaginary parts are separated.

Example

In [88]:
x = symbols("x", real = true)
y = symbols("y", real = true)
expr = (x+im*y)^2
println("func($expr) = $(SymPy.func(expr))")
separate_real_imaginary_power(expr)
func((x + I*y)^2) = <class 'sympy.core.power.Pow'>
Out[88]:
$$x^{2} + 2 i x y - y^{2}$$

separate_real_imaginary_mult(expr)

Helper function that deals with the case where the toplevel operation is multiplication.

In [89]:
function separate_real_imaginary_mult(expr::SymPy.Sym)
    terms = args(expr)
    result = 1
    # if the expanded expression contains toplevel multiplication, the individual terms must all be exponentials or powers
    for term in terms
        # println("term = $term")
        # if term is exponential
        if SymPy.func(term) == SymPy.func(sympyExpExpr)
            termSeparated = separate_real_imaginary_exp(term)
        # if term is power (not sure if this case and the case below overlaps)
        elseif SymPy.func(term) == SymPy.func(sympyPowerExpr)
            termSeparated = separate_real_imaginary_power(term)
            # else, further split each product term into indivdual factors (this case also includes the case where term is a number, which would go into the "constant" below)
        else
            termSeparated = term # term is a number
#             (constant, factors) = factor_list(term)
#             termSeparated = constant
#             # separate each factor into real and imaginary parts and collect the product of separated factors
#             for (factor, power) in factors
#                 factor = factor^power
#                 termSeparated = termSeparated * (real(factor) + im*imag(factor))
#             end
        end
        # println("termSeparated = $termSeparated") 
        # collect the product of separated term, i.e., product of separated factors
        result = result * termSeparated
    end
    result = real(result) + im*imag(result)
    return result
end
Out[89]:
separate_real_imaginary_mult (generic function with 1 method)

Parameters

  • expr: SymPy.Sym
    • Symbolic expression in $x+iy$ whose toplevel operation is multiplication, i.e., SymPy.func(expr) = SymPy.func(sympyMultExpr).

Returns

  • separate_real_imaginary_mult: SymPy.Sym
    • Returns a symbolic expression whose real and imaginary parts are separated.

Example

In [90]:
x = symbols("x", real = true)
y = symbols("y", real = true)
expr = (x+im*y)*2x
println("func($expr) = $(SymPy.func(expr))")
separate_real_imaginary_mult(expr)
func(2*x*(x + I*y)) = <class 'sympy.core.mul.Mul'>
Out[90]:
$$2 x^{2} + 2 i x y$$

separate_real_imaginary_add(expr)

Helper function that deals with the case where the toplevel operation is addition.

In [91]:
function separate_real_imaginary_add(expr::SymPy.Sym)
    x = symbols("x")
    # if the expanded expression contains toplevel addition, the individual terms must all be products or symbols
    terms = args(expr)
    result = 0
    # termSeparated = 0 # to avoid undefined error if there is no else (case incomplete)
    for term in terms
        # println("term = $term")
        # if term is a symbol
        if SymPy.func(term) == SymPy.func(x)
            termSeparated = term
        # if term is exponential
        elseif SymPy.func(term) == SymPy.func(sympyExpExpr)
            termSeparated = separate_real_imaginary_exp(term)
        # if term is a power
        elseif SymPy.func(term) == SymPy.func(sympyPowerExpr)
            termSeparated = separate_real_imaginary_power(term)
        # if term is a product
        elseif SymPy.func(term) == SymPy.func(sympyMultExpr)
            termSeparated = separate_real_imaginary_mult(term)
        # if term is a number
        else
            termSeparated = term
        end
        # println("termSeparated = $termSeparated")
        result = result + termSeparated
    end
    result = real(result) + im*imag(result)
    return result
end
Out[91]:
separate_real_imaginary_add (generic function with 1 method)

Parameters

  • expr: SymPy.Sym
    • Symbolic expression in $x+iy$ whose toplevel operation is addition, i.e., SymPy.func(expr) = SymPy.func(sympAddExpr).

Returns

  • separate_real_imaginary_add: SymPy.Sym
    • Returns a symbolic expression whose real and imaginary parts are separated.

Example

In [92]:
x = symbols("x", real = true)
y = symbols("y", real = true)
expr = (x+im*y) + 2x
println("func($expr) = $(SymPy.func(expr))")
separate_real_imaginary_add(expr)
func(3*x + I*y) = <class 'sympy.core.add.Add'>
Out[92]:
$$3 x + i y$$

separate_real_imaginary_power_mult_add(expr)

Helper function that deals with the cases where the toplevel operation is power, addition, or multiplication.

In [93]:
function separate_real_imaginary_power_mult_add(expr::SymPy.Sym)
    if SymPy.func(expr) == SymPy.func(sympyPowerExpr)
        result = separate_real_imaginary_power(expr)
    elseif SymPy.func(expr) == SymPy.func(sympyMultExpr)
        result = separate_real_imaginary_mult(expr)
        else #if SymPy.func(expr) == SymPy.func(sympyAddExpr)
        result = separate_real_imaginary_add(expr)
#     else
#         result = expr
    end
    return result
end
Out[93]:
separate_real_imaginary_power_mult_add (generic function with 1 method)

Parameters

  • expr: SymPy.Sym
    • Symbolic expression in $x+iy$ whose toplevel operation is power, multiplication, or addition, i.e., SymPy.func(expr) = SymPy.func(sympPowerExpr), SymPy.func(sympMultExpr), or SymPy.func(sympAddExpr).

Returns

  • separate_real_imaginary_power_mult_add: SymPy.Sym
    • Returns a symbolic expression whose real and imaginary parts are separated.

Example

In [94]:
x = symbols("x", real = true)
y = symbols("y", real = true)
expr = (x+im*y) + 2x
println("func($expr) = $(SymPy.func(expr))")
separate_real_imaginary_power_mult_add(expr)
func(3*x + I*y) = <class 'sympy.core.add.Add'>
Out[94]:
$$3 x + i y$$

separate_real_imaginary_others(expr)

Helper function that deals with the case where the toplevel operation is not exponentiation, power, multiplication or addition. In this case, expr must be a single term, e.g., x or cos(2x+1), which is a function wrapping around an expression. So we use the other helper functions to separate the expression wrapped in the function and feed it back to the function.

In [95]:
function separate_real_imaginary_others(expr::SymPy.Sym)
    # if the expanded expression is neither of the above, it must be a single term, e.g., x or cos(2x+1), which is a function wrapping around an expression; in this case, use the helper function to clean up the expression and feed it back to the function
    term = args(expr)[1]
    termCleaned = separate_real_imaginary_power_mult_add(term)
    result = subs(expr,args(expr)[1],termCleaned)
    result = real(result) + im*imag(result)
    return result
end
Out[95]:
separate_real_imaginary_others (generic function with 1 method)

Parameters

  • expr: SymPy.Sym
    • Symbolic expression in $x+iy$ whose toplevel operation is not power, multiplication, or addition, i.e., SymPy.func(expr) != SymPy.func(sympPowerExpr), SymPy.func(sympMultExpr), or SymPy.func(sympAddExpr).

Returns

  • separate_real_imaginary_others: SymPy.Sym
    • Returns a symbolic expression whose real and imaginary parts are separated.

Example

In [96]:
x = symbols("x", real = true)
y = symbols("y", real = true)
expr = cos(x+im*y)
println("func($expr) = $(SymPy.func(expr))")
separate_real_imaginary_others(expr)
func(cos(x + I*y)) = cos
Out[96]:
$$- i \sin{\left (x \right )} \sinh{\left (y \right )} + \cos{\left (x \right )} \cosh{\left (y \right )}$$

separate_real_imaginary(delta)

The main function that separates the real and imaginary parts of $\Delta$, an exponential polynomial in one variable.

In [97]:
function separate_real_imaginary(delta::SymPy.Sym)
    x = symbols("x", real = true)
    y = symbols("y", real = true)
    
    freeSymbols = free_symbols(delta)
    # check if delta has one and only one free symbol (e.g., global variable lambda)
    if length(freeSymbols) == 1
        lambda = freeSymbols[1]
        # substitute lambda with x+iy
        expr = subs(delta, lambda, x+im*y)
        # expand the new expression
        expr = expand(expr)
        
        if SymPy.func(expr) == SymPy.func(sympyPowerExpr)
#             println(expr)
#             println("power!")
            result = separate_real_imaginary_power(expr)
#             println("result = $result")
        elseif SymPy.func(expr) == SymPy.func(sympyAddExpr)
#             println(expr)
#             println("addition!")
            result = separate_real_imaginary_add(expr)
#             println("result = $result")
        elseif SymPy.func(expr) == SymPy.func(sympyMultExpr)
#             println(expr)
#             println("multiplication!")
            result = separate_real_imaginary_mult(expr)
#             println("result = $result")
        else
#             println(expr)
#             println("single term!")
            result = separate_real_imaginary_others(expr)
#             println("result = $result")
        end
        result = expand(result)
        return real(result) + im*imag(result)
        
    else
        throw("Delta has more than one variable")
    end
end
Out[97]:
separate_real_imaginary (generic function with 1 method)

\begin{align*} \Delta(\lambda)=\lambda + 1 = x + iy + 1. \end{align*}

In [98]:
lambda = symbols("lambda")
delta = lambda + 1
separate_real_imaginary(delta)
Out[98]:
$$x + i y + 1$$

\begin{align*} \Delta(\lambda)=e^\lambda = e^{x+iy}=e^x e^{iy} = e^x\cos(y) + ie^x\sin(y)). \end{align*}

In [99]:
delta = e^(lambda)
separate_real_imaginary(delta)
Out[99]:
$$i e^{x} \sin{\left (y \right )} + e^{x} \cos{\left (y \right )}$$

\begin{align*} \Delta(\lambda) &= \lambda^2 = (x+iy)^2 = x^2-y^2 + i2xy. \end{align*}

In [100]:
delta = lambda^2
separate_real_imaginary(delta)
Out[100]:
$$x^{2} + 2 i x y - y^{2}$$

\begin{align*} \Delta(\lambda) &= \cos(\lambda)\\ &= \frac{1}{2}e^{i\lambda} + \frac{1}{2}e^{-i\lambda}\\ &= \frac{1}{2}e^{i(x+iy)} + \frac{1}{2}e^{-i(x+iy)} \\ &= \frac{1}{2}(e^{-y}e^{ix} + e^ye^{-ix})\\ &= \frac{1}{2}e^{-y}(\cos(x) + i\sin(x)) + \frac{1}{2}e^y(\cos(x) - i\sin(x))\\ &= \cos(x)\cosh(y) - i\sin(x)\sinh(y) \end{align*}

In [101]:
delta = cos(lambda)
separate_real_imaginary(delta)
Out[101]:
$$- i \sin{\left (x \right )} \sinh{\left (y \right )} + \cos{\left (x \right )} \cosh{\left (y \right )}$$

\begin{align*} \Delta(\lambda) &= \cos(\lambda)e^\lambda\\ &= \cos(x+iy)e^{x+iy}\\ &= \cos(x+iy)e^x e^{iy}\\ &= \left[\cos(x)\cosh(y) - i\sin(x)\sinh(y)\right]e^x(\cos(y) + i\sin(y))\\ &= e^x\cos(x)\cosh(y)\cos(y) + e^x\sin(x)\sinh(y)\sin(y) + i(e^x\cos(x)\cosh(y)\sin(y)-e^x\sin(x)\sinh(y)\cos(y)). \end{align*}

In [102]:
delta = cos(lambda)*e^(lambda)
separate_real_imaginary(delta)
Out[102]:
$$i \left(- e^{x} \sin{\left (x \right )} \cos{\left (y \right )} \sinh{\left (y \right )} + e^{x} \sin{\left (y \right )} \cos{\left (x \right )} \cosh{\left (y \right )}\right) + e^{x} \sin{\left (x \right )} \sin{\left (y \right )} \sinh{\left (y \right )} + e^{x} \cos{\left (x \right )} \cos{\left (y \right )} \cosh{\left (y \right )}$$

\begin{align*} \Delta(\lambda) &= (\lambda^3 + \lambda+2)e^\lambda \end{align*}

In [103]:
delta = (lambda^3+lambda+2)*e^(lambda)
separatedDelta = separate_real_imaginary(delta)
prettyPrint(separatedDelta)
# Verified with WolframAlpha
Out[103]:
$$x^{3} e^{x} \cos{\left (y \right )} - 3 x^{2} y e^{x} \sin{\left (y \right )} - 3 x y^{2} e^{x} \cos{\left (y \right )} + x e^{x} \cos{\left (y \right )} + y^{3} e^{x} \sin{\left (y \right )} - y e^{x} \sin{\left (y \right )} + i \left(x^{3} e^{x} \sin{\left (y \right )} + 3 x^{2} y e^{x} \cos{\left (y \right )} - 3 x y^{2} e^{x} \sin{\left (y \right )} + x e^{x} \sin{\left (y \right )} - y^{3} e^{x} \cos{\left (y \right )} + y e^{x} \cos{\left (y \right )} + 2 e^{x} \sin{\left (y \right )}\right) + 2 e^{x} \cos{\left (y \right )}$$

plot_levelCurves(bivariateDelta; realFunc, imagFunc, xRange, yRange, step, width, height)

Plots the level curves $\Re(\Delta(x+iy)) = 0$ and $\Im(\Delta(x+iy)) = 0$ in the $\Re-\Im$ plane.

In [104]:
function plot_levelCurves(bivariateDelta::SymPy.Sym; realFunc = real(bivariateDelta), imagFunc = imag(bivariateDelta), xRange = (-INFTY, INFTY), yRange = (-INFTY, INFTY), step = INFTY/1000, width = 1500, height = 1000)
    freeSymbols = free_symbols(bivariateDelta)
    x = symbols("x", real = true)
    y = symbols("y", real = true)
    
    xGridStep = (xRange[2] - xRange[1])/50
    yGridStep = (yRange[2] - yRange[1])/50
    
    if freeSymbols == [x, y]
        Plots.contour(xRange[1]:step:xRange[2], yRange[1]:step:yRange[2], realFunc, levels=[0], size = (width, height), tickfontsize = 20, seriescolor=:reds, transpose = false, linewidth = 4, linealpha = 1, xticks = xRange[1]:xGridStep:xRange[2], yticks = yRange[1]:yGridStep:yRange[2], grid = true, gridalpha = 0.5)
        Plots.contour!(xRange[1]:step:xRange[2], yRange[1]:step:yRange[2], imagFunc, levels=[0], size = (width, height), tickfontsize = 20, seriescolor=:blues, transpose = false, linewidth = 4, linealpha = 1, xticks = xRange[1]:xGridStep:xRange[2], yticks = yRange[1]:yGridStep:yRange[2], grid = true, gridalpha = 0.5)
    else
        Plots.contour(xRange[1]:step:xRange[2], yRange[1]:step:yRange[2], realFunc, levels=[0], size = (width, height), tickfontsize = 20, seriescolor=:reds, transpose = true, linewidth = 4, linealpha = 1, xticks = xRange[1]:xGridStep:xRange[2], yticks = yRange[1]:yGridStep:yRange[2], grid = true, gridalpha = 0.5)
        Plots.contour!(xRange[1]:step:xRange[2], yRange[1]:step:yRange[2], imagFunc, levels=[0], size = (width, height), tickfontsize = 20, seriescolor=:blues, transpose = true, linewidth = 4, linealpha = 1, xticks = xRange[1]:xGridStep:xRange[2], yticks = yRange[1]:yGridStep:yRange[2], grid = true, gridalpha = 0.5)
    end
end
Out[104]:
plot_levelCurves (generic function with 1 method)

Parameters

  • bivariateDelta: SymPy.Sym
    • Symbolic expression of $\Delta(\lambda)$ with $\lambda$ replaced by $x+iy$.
  • realFunc*, imagFunc*: SymPy.Sym or Function
    • Real and imaginary parts of $\Delta(\lambda)$. Default to real(separatedDelta) and imag(separatedDelta). If input manually, they need to be functions in two variables $x$, $y$ where $\lambda = x+iy$.
  • xRange*, yRange*: Tuple{Number, Number}
    • Ranges of $\Re(\Delta(\lambda))$ and $\Im(\Delta(\lambda))$ in the plot. Default to (-INFTY, INFTY).
  • step*: Number
    • The distance between two points that are plotted as projected onto the x and y axes, i.e., the step in the sequence of points in x and y to be plotted.
  • width*, height*: Number
    • Width and height of the plot.

Returns

  • plot_levelCurves: None
    • Plots the contour plots without returning them.

Example

In [105]:
lambda = symbols("lambda")
x = symbols("x", real = true)
y = symbols("y", real = true)
delta = lambda + 1
bivariateDelta = subs(delta, lambda, x+im*y)
# plot_levelCurves(separatedDelta) # somehow causes method error, probably because real(separatedDelta) is a function of x only and imag(separatedDelta) is a function of y only. In this case, we need to input the realFunc and imagFunc manually
plot_levelCurves(bivariateDelta; realFunc = (x, y) -> x + 1, imagFunc = (x, y) -> y)
WARNING: Keyword argument match_dimensions not supported with Plots.GRBackend().  Choose from: Set(Symbol[:top_margin, :group, :background_color, :yforeground_color_text, :yguidefontcolor, :seriesalpha, :legendfontcolor, :seriescolor, :ztick_direction, :zlims, :overwrite_figure, :xguidefonthalign, :normalize, :linestyle, :xflip, :fillcolor, :ygrid, :background_color_inside, :zguidefonthalign, :bins, :yscale, :xtickfontcolor, :xguide, :fillalpha, :tick_direction, :yguidefontsize, :legendfontfamily, :foreground_color, :xtickfonthalign, :x, :ytickfontrotation, :legend, :discrete_values, :ytick_direction, :xguidefontrotation, :ribbon, :tickfontrotation, :xdiscrete_values, :legendtitle, :xgridstyle, :orientation, :gridstyle, :markersize, :camera, :xforeground_color_grid, :quiver, :zticks, :markerstrokecolor, :ztickfontrotation, :ztickfonthalign, :legendfonthalign, :xtickfontsize, :levels, :zgridstyle, :foreground_color_border, :zguidefontvalign, :marker_z, :markerstrokealpha, :markeralpha, :tickfontvalign, :zguidefontcolor, :ygridlinewidth, :zlink, :zscale, :smooth, :xticks, :zguidefontsize, :y, :margin, :ytickfontcolor, :yforeground_color_border, :zguidefontfamily, :zgridalpha, :yguidefontvalign, :yguidefonthalign, :ztickfontcolor, :html_output_format, :tickfontcolor, :titlefontrotation, :legendfontvalign, :tickfontsize, :z, :yforeground_color_axis, :xtickfontrotation, :xerror, :contour_labels, :xguidefontcolor, :primary, :guidefonthalign, :aspect_ratio, :link, :yguide, :guidefontvalign, :yguidefontfamily, :layout, :polar, :right_margin, :xlink, :series_annotations, :inset_subplots, :ytickfontsize, :tickfontfamily, :xgrid, :ygridalpha, :xtick_direction, :colorbar, :zflip, :ticks, :legendfontrotation, :linealpha, :arrow, :xtickfontvalign, :zgrid, :bar_width, :zguide, :zforeground_color_text, :weights, :xgridalpha, :ygridstyle, :fill_z, :ztickfontfamily, :markershape, :background_color_subplot, :xguidefontvalign, :markerstrokewidth, :xguidefontfamily, :gridlinewidth, :foreground_color_subplot, :xgridlinewidth, :foreground_color_text, :titlefonthalign, :yerror, :zgridlinewidth, :grid, :xguidefontsize, :xforeground_color_axis, :background_color_outside, :titlefontcolor, :line_z, :size, :projection, :zguidefontrotation, :ydiscrete_values, :seriestype, :yflip, :fillrange, :ztickfontvalign, :xlims, :xforeground_color_border, :markercolor, :ylink, :yforeground_color_grid, :color_palette, :lims, :xscale, :left_margin, :annotations, :window_title, :foreground_color_axis, :yguidefontrotation, :guidefontsize, :zdiscrete_values, :tickfonthalign, :bottom_margin, :framestyle, :scale, :zforeground_color_border, :background_color_legend, :linecolor, :foreground_color_legend, :title, :subplot_index, :flip, :titlefontvalign, :foreground_color_grid, :linewidth, :ztickfontsize, :gridalpha, :guidefontfamily, :ylims, :xtickfontfamily, :ytickfontvalign, :ytickfontfamily, :xforeground_color_text, :show, :guidefontrotation, :legendfontsize, :subplot, :label, :ytickfonthalign, :guide, :guidefontcolor, :titlefontsize, :titlefontfamily, :zforeground_color_axis, :zforeground_color_grid, :yticks])
Out[105]:
-10.0 -9.6 -9.2 -8.8 -8.4 -8.0 -7.6 -7.2 -6.8 -6.4 -6.0 -5.6 -5.2 -4.8 -4.4 -4.0 -3.6 -3.2 -2.8 -2.4 -2.0 -1.6 -1.2 -0.8 -0.4 0.0 0.4 0.8 1.2 1.6 2.0 2.4 2.8 3.2 3.6 4.0 4.4 4.8 5.2 5.6 6.0 6.4 6.8 7.2 7.6 8.0 8.4 8.8 9.2 9.6 10.0 -10.0 -9.6 -9.2 -8.8 -8.4 -8.0 -7.6 -7.2 -6.8 -6.4 -6.0 -5.6 -5.2 -4.8 -4.4 -4.0 -3.6 -3.2 -2.8 -2.4 -2.0 -1.6 -1.2 -0.8 -0.4 0.0 0.4 0.8 1.2 1.6 2.0 2.4 2.8 3.2 3.6 4.0 4.4 4.8 5.2 5.6 6.0 6.4 6.8 7.2 7.6 8.0 8.4 8.8 9.2 9.6 10.0
In [106]:
delta = (lambda^3+lambda+2)*e^(lambda)
bivariateDelta = subs(delta, lambda, x+im*y)
plot_levelCurves(bivariateDelta)
Out[106]:
-10.0 -9.6 -9.2 -8.8 -8.4 -8.0 -7.6 -7.2 -6.8 -6.4 -6.0 -5.6 -5.2 -4.8 -4.4 -4.0 -3.6 -3.2 -2.8 -2.4 -2.0 -1.6 -1.2 -0.8 -0.4 0.0 0.4 0.8 1.2 1.6 2.0 2.4 2.8 3.2 3.6 4.0 4.4 4.8 5.2 5.6 6.0 6.4 6.8 7.2 7.6 8.0 8.4 8.8 9.2 9.6 10.0 -10.0 -9.6 -9.2 -8.8 -8.4 -8.0 -7.6 -7.2 -6.8 -6.4 -6.0 -5.6 -5.2 -4.8 -4.4 -4.0 -3.6 -3.2 -2.8 -2.4 -2.0 -1.6 -1.2 -0.8 -0.4 0.0 0.4 0.8 1.2 1.6 2.0 2.4 2.8 3.2 3.6 4.0 4.4 4.8 5.2 5.6 6.0 6.4 6.8 7.2 7.6 8.0 8.4 8.8 9.2 9.6 10.0

The Fokas Transform pair

Implement the transform pair (2.15a), (2.15b) on page 10 of "Evolution PDEs and augmented eigenfunctions. Finite interval," given by

\begin{alignat*}{2} F_\lambda: f(x)&\mapsto F(\lambda):\quad F_\lambda(f) &= \begin{cases} F_\lambda^+(f),&\quad\mbox{if $\lambda\in \Gamma_0^+\cup \Gamma_a^+$}\\ F_\lambda^-(f),&\quad\mbox{if $\lambda\in \Gamma_0^-\cup \Gamma_a^-$}\\ \end{cases}\\ f_x: F(\lambda)&\mapsto f(x):\quad f_x(F) &= \int_\Gamma e^{i\lambda x}F(\lambda)\,d\lambda,\quad x\in [0,1]. \end{alignat*}

check_boundaryConditions(L, U, fSym)

Checks whether $f$ satisfies the boundary conditions, i.e., whether $f\in\Phi$.

In [107]:
function check_boundaryConditions(L::LinearDifferentialOperator, U::VectorBoundaryForm, fSym::Union{SymPy.Sym, Number})
    # Checks whether f satisfies the homogeneous boundary conditions
    Ux = get_Ux(L, U, fSym)
    return check_all(Ux, x->is_approx(x, 0))
end
Out[107]:
check_boundaryConditions (generic function with 1 method)

Parameters

  • L: LinearDifferentialOperator
    • Linear differential operator in the IBVP.
  • U: VectorBoundaryForm
    • Vector boundary form in the IBVP.
  • fSym: SymPy.Sym or Number
    • Symbolic expression of the initial condition in the IBVP.

Returns

  • check_boundaryConditions: Bool
    • Returns true if $f$ satisfies the homogeneous boundary conditions within a tolerance (TOL) and false otherwise.

Example

In [108]:
t = symbols("t")
symPFunctions = [-1 0 0]
interval = (0,1)
symL = SymLinearDifferentialOperator(symPFunctions, interval, t)
L = get_L(symL)
M = [1 0; 0 1]
N = [-1 0; 0 -1]
U = VectorBoundaryForm(M, N)
x = symbols("x")
fSym = sin(2*pi*x)
check_boundaryConditions(L, U, fSym)
Out[108]:
true

get_MPlusMinus(adjointU; symbolic, generic)

Let $\alpha=e^{2\pi i/n}$; given adjoint vector boundary form associated with two matrices $b^\star$, $\beta^\star$, computes matrices $M^+(\lambda)$, $M^-(\lambda)$ given by \begin{align*} M^+_{kj}(\lambda) &= \sum_{r=0}^{n-1}(-i\alpha^{k-1}\lambda)^rb^\star_{jr}\\ M^-_{kj}(\lambda) &= \sum_{r=0}^{n-1}(-i\alpha^{k-1}\lambda)^r\beta^\star_{jr} \end{align*} as functions of $\lambda$ (for fixed $b^\star$, $\beta^\star$) or their symbolic expressions.

In [109]:
function get_MPlusMinus(adjointU::VectorBoundaryForm; symbolic = false, generic = false)
    # these are numeric matrices
    bStar, betaStar = adjointU.M, adjointU.N
    n = size(bStar)[1]
    if symbolic
        # return MPlus and MMinus as symbolic expressions with (the global variable) lambda as free variable
        lambda = symbols("lambda")
        if generic
            alpha = symbols("alpha")
        else
            alpha = e^(2*PI*im/n)
        end
        MPlusMat = Array{SymPy.Sym}(n,n)
        for k = 1:n
            for j = 1:n
                sumPlus = 0
                for r = 0:(n-1)
                    summandPlus = (-im*alpha^(k-1)*lambda)^r * bStar[j,r+1]
                    sumPlus += summandPlus
                end
                sumPlus = simplify(sumPlus)
                MPlusMat[k,j] = sumPlus
            end
        end
        MPlusSym = MPlusMat
        MMinusMat = Array{SymPy.Sym}(n,n)
        for k = 1:n
            for j = 1:n
                sumMinus = 0
                for r = 0:(n-1)
                    summandMinus = (-im*alpha^(k-1)*lambda)^r * betaStar[j,r+1]
                    sumMinus += summandMinus
                end
                sumMinus = simplify(sumMinus)
                MMinusMat[k,j] = sumMinus
            end
        end
        MMinusSym = MMinusMat
        return (MPlusSym, MMinusSym)
    else
        alpha = e^(2*pi*im/n)
        # if not symbolic, return MPlus and MMinus as functions of lambda
        function MPlus(lambda::Number)
            MPlusMat = Array{Number}(n,n)
            for k = 1:n
                for j = 1:n
                    sumPlus = 0
                    for r = 0:(n-1)
                        summandPlus = (-im*alpha^(k-1)*lambda)^r * bStar[j,r+1]
                        sumPlus += summandPlus
                    end
                    MPlusMat[k,j] = sumPlus
                end
            end
            return MPlusMat
        end
        function MMinus(lambda::Number)
            MMinusMat = Array{Number}(n,n)
            for k = 1:n
                for j = 1:n
                    sumMinus = 0
                    for r = 0:(n-1)
                        summandMinus = (-im*alpha^(k-1)*lambda)^r * betaStar[j,r+1]
                        sumMinus += summandMinus
                    end
                    MMinusMat[k,j] = sumMinus
                end
            end
            return MMinusMat
        end
    end
    return (MPlus, MMinus)
end
Out[109]:
get_MPlusMinus (generic function with 1 method)

Parameters

  • adjointU: VectorBoundaryForm
    • Output of get_adjointU().
  • symbolic*: Bool
    • Boolean indicating whether the output is symbolic.
  • generic*: Bool
    • If symbolic = true, boolean indicating whether to keep $\alpha=e^{2\pi i/n}$ as a symbol.

Returns

  • get_MPlusMinus: Function or SymPy.Sym
    • Returns $M^+(\lambda)$, $M^-(\lambda)$ as functions if symbolic = false and as symbolic expressions if symbolic = true.

Example

In [110]:
t = symbols("t")
symPFunctions = [1 t+1 t^2+t+1]
interval = (0, 1)
symL = SymLinearDifferentialOperator(symPFunctions, interval, t)
L = get_L(symL)
M = [1 0; 2 0]
N = [0 2; 0 1]
U = VectorBoundaryForm(M, N)
adjointU = get_adjointU(L, U)
Out[110]:
VectorBoundaryForm(Complex[-1.0-0.0im 0.0-0.0im; 0.0-0.0im 0.0-0.0im], Complex[0.0-0.0im 0.0-0.0im; 2.0-0.0im -1.0-0.0im])
In [111]:
(MPlusSym, MMinusSym) = get_MPlusMinus(adjointU; symbolic = true, generic = false)
prettyPrint.(MMinusSym)
Out[111]:
\begin{bmatrix}0&i \lambda + 2\\0&- i \lambda + 2\end{bmatrix}
In [112]:
(MPlus, MMinus) = get_MPlusMinus(adjointU; symbolic = false)
lambda = 1+im
println("MPlus($lambda) = $(MPlus(lambda))")
println("MMinus($lambda) = $(MMinus(lambda))")
println("MPlusSym($lambda) = $(prettyPrint.(evaluate.(MPlusSym, lambda)))")
println("MMinusSym($lambda) = $(prettyPrint.(evaluate.(MMinusSym, lambda)))")
MPlus(1 + 1im) = Number[-1.0-0.0im 0.0+0.0im; -1.0+0.0im 0.0+0.0im]
MMinus(1 + 1im) = Number[0.0+0.0im 1.0+1.0im; 0.0+0.0im 3.0-1.0im]
MPlusSym(1 + 1im) = SymPy.Sym[-1 0; -1 0]
MMinusSym(1 + 1im) = SymPy.Sym[0 1 + I; 0 3 - I]

get_M(adjointU; symbolic, generic)

Computes $M$ given by $$M_{kj}(\lambda) = M^+_{kj}(\lambda) + M^-_{kj}(\lambda)e^{-i\alpha^{k-1}\lambda}$$ as a function of $\lambda$ or its symbolic expression.

In [113]:
function get_M(adjointU::VectorBoundaryForm; symbolic = false, generic = false)
    bStar, betaStar = adjointU.M, adjointU.N
    n = size(bStar)[1]
    if symbolic
        # return M as a symbolic expression with lambda as free variable
        lambda = symbols("lambda")
        if generic
            alpha = symbols("alpha")
        else
            alpha = e^(2*PI*im/n)
        end
        (MPlusSym, MMinusSym) = get_MPlusMinus(adjointU; symbolic = true, generic = generic)
        MLambdaSym = Array{SymPy.Sym}(n,n)
        for k = 1:n
            for j = 1:n
                MLambdaSym[k,j] = simplify(MPlusSym[k,j] + MMinusSym[k,j] * e^(-im*alpha^(k-1)*lambda))
            end
        end
        MSym = simplify.(MLambdaSym)
        return MSym
    else
        alpha = e^(2*pi*im/n)
        function M(lambda::Number)
            (MPlus, MMinus) = get_MPlusMinus(adjointU)
            MPlusLambda, MMinusLambda = MPlus(lambda), MMinus(lambda)
            MLambda = Array{Number}(n,n)
            for k = 1:n
                for j = 1:n
                    MLambda[k,j] = MPlusLambda[k,j] + MMinusLambda[k,j] * e^(-im*alpha^(k-1)*lambda)
                end
            end
            return MLambda
        end
        return M 
    end
end
Out[113]:
get_M (generic function with 1 method)

Parameters

  • adjointU: VectorBoundaryForm
    • Output of get_adjointU().
  • symbolic*: Bool
    • Boolean indicating whether the output is symbolic.
  • generic*: Bool
    • If symbolic = true, boolean indicating whether to keep $\alpha=e^{2\pi i/n}$ as a symbol.

Returns

  • get_M: Function or SymPy.Sym
    • Returns $M(\lambda)$ as function if symbolic = false and as symbolic expression if symbolic = true.

Example

In [114]:
t = symbols("t")
symPFunctions = [1 t+1 t^2+t+1]
interval = (0, 1)
symL = SymLinearDifferentialOperator(symPFunctions, interval, t)
L = get_L(symL)

M = [1 0; 2 0]
N = [0 2; 0 1]
U = VectorBoundaryForm(M, N)

adjointU = get_adjointU(L, U)
Out[114]:
VectorBoundaryForm(Complex[-1.0-0.0im 0.0-0.0im; 0.0-0.0im 0.0-0.0im], Complex[0.0-0.0im 0.0-0.0im; 2.0-0.0im -1.0-0.0im])
In [115]:
MSym = get_M(adjointU; symbolic = true, generic = false)
prettyPrint.(MSym)
Out[115]:
\begin{bmatrix}-1&\left(i \lambda + 2\right) e^{- i \lambda}\\-1&\left(- i \lambda + 2\right) e^{i \lambda}\end{bmatrix}
In [116]:
M = get_M(adjointU; symbolic = false)
lambda = 1+im
println("M($lambda) = $(M(lambda))")
println("MSym($lambda) = $(evaluate.(sym_to_func.(MSym), lambda))")
M(1 + 1im) = Number[-1.0+0.0im 3.75605-0.818661im; -1.0+0.0im 0.905858+0.729914im]
MSym(1 + 1im) = Number[-1.0 3.75605-0.818661im; -1.0 0.905858+0.729914im]

get_delta(adjointU; symbolic, generic)

Computes $\Delta := \det(M)$ as a function of $\lambda$ (for fixed adjointU) or its symbolic expression.

In [117]:
function get_delta(adjointU::VectorBoundaryForm; symbolic = false, generic = false)
    if symbolic
        MSym = get_M(adjointU; symbolic = true, generic = generic)
        deltaSym = simplify(SymPy.det(MSym))
        return deltaSym
    else
       function delta(lambda::Number)
            M = get_M(adjointU; symbolic = false)
            MLambda = convert(Array{Complex}, M(lambda))
            return det(MLambda)
        end
        return delta 
    end
end
Out[117]:
get_delta (generic function with 1 method)

Parameters

  • adjointU: VectorBoundaryForm
    • Output of get_adjointU().
  • symbolic*: Bool
    • Boolean indicating whether the output is symbolic.
  • generic*: Bool
    • If symbolic = true, boolean indicating whether to keep $\alpha=e^{2\pi i/n}$ as a symbol.

Returns

  • get_delta: Function or SymPy.Sym
    • Returns $\Delta(\lambda)$ as function if symbolic = false and as symbolic expression if symbolic = true.

Example

In [118]:
t = symbols("t")
symPFunctions = [1 t+1 t^2+t+1]
interval = (0, 1)
symL = SymLinearDifferentialOperator(symPFunctions, interval, t)
L = get_L(symL)

M = [1 0; 2 0]
N = [0 2; 0 1]
U = VectorBoundaryForm(M, N)

adjointU = get_adjointU(L, U)
Out[118]:
VectorBoundaryForm(Complex[-1.0-0.0im 0.0-0.0im; 0.0-0.0im 0.0-0.0im], Complex[0.0-0.0im 0.0-0.0im; 2.0-0.0im -1.0-0.0im])
In [119]:
deltaSym = simplify(get_delta(adjointU; symbolic = true, generic = false))
prettyPrint(deltaSym)
Out[119]:
$$\left(i \lambda + \left(i \lambda - 2\right) e^{2 i \lambda} + 2\right) e^{- i \lambda}$$
In [120]:
delta = get_delta(adjointU; symbolic = false)
lambda = 1+im
println("delta($lambda) = $(delta(lambda))")
println("deltaSym($lambda) = $(evaluate(deltaSym, lambda))")
delta(1 + 1im) = 2.8501910204023764 - 1.548574863875881im
deltaSym(1 + 1im) = 2.8501910204023764 - 1.548574863875881im

get_Xlj(adjointU, l, j; symbolic, generic)

Gets $X_{lj}$, which is the $(n-1)\times (n-1)$ submatrix of $M(\lambda)$ whose $11$-entry is the $(l+1)(j+1)$-entry of $M(\lambda)$, as a function of $\lambda$ (for fixed adjointU, $M$, $l$, $j$), or its symbolic expression.

In [121]:
function get_Xlj(adjointU::VectorBoundaryForm, l::Number, j::Number; symbolic = false, generic = false)
    bStar, betaStar = adjointU.M, adjointU.N
    n = size(bStar)[1]
    if symbolic
        MSym = get_M(adjointU; symbolic = true, generic = generic)
        MBlockSym = [MSym MSym; MSym MSym]
        XljSym = MBlockSym[(l+1):(l+1+n-2), (j+1):(j+1+n-2)]
        return XljSym
    else
        M = get_M(adjointU; symbolic = false)
        function Xlj(lambda::Number)
            MLambda = M(lambda)
            MLambdaBlock = [MLambda MLambda; MLambda MLambda]
            XljLambda = MLambdaBlock[(l+1):(l+1+n-2), (j+1):(j+1+n-2)]
            return XljLambda
        end
        return Xlj 
    end
end
Out[121]:
get_Xlj (generic function with 1 method)

Parameters

  • adjointU: VectorBoundaryForm
    • Output of get_adjointU().
  • l, j: Int
    • Indices specifying the submatrix of $M$ that is $X_{lj}$.
  • symbolic*: Bool
    • Boolean indicating whether the output is symbolic.
  • generic*: Bool
    • If symbolic = true, boolean indicating whether to keep $\alpha=e^{2\pi i/n}$ as a symbol.

Returns

  • get_Xlj: Array of Function or SymPy.Sym
    • Returns $X_{lj}(\lambda)$ as a matrix of functions if symbolic = false and as symbolic expressions if symbolic = true.

Example

In [122]:
t = symbols("t")
symPFunctions = [1 t+1 t^2+t+1]
interval = (0, 1)
symL = SymLinearDifferentialOperator(symPFunctions, interval, t)
L = get_L(symL)

M = [1 0; 2 0]
N = [0 2; 0 1]
U = VectorBoundaryForm(M, N)

adjointU = get_adjointU(L, U)
Out[122]:
VectorBoundaryForm(Complex[-1.0-0.0im 0.0-0.0im; 0.0-0.0im 0.0-0.0im], Complex[0.0-0.0im 0.0-0.0im; 2.0-0.0im -1.0-0.0im])
In [123]:
l, j = 1, 1
XljSym = prettyPrint.(get_Xlj(adjointU, l, j; symbolic = true))
Out[123]:
\begin{bmatrix}\left(- i \lambda + 2\right) e^{i \lambda}\end{bmatrix}
In [124]:
Xlj = get_Xlj(adjointU, l, j; symbolic = false)
lambda = 1+im
println("Xlj($lambda) = $(Xlj(lambda))")
println("XljSym($lambda) = $(evaluate.(XljSym, lambda))")
Xlj(1 + 1im) = Number[0.905858+0.729914im]
XljSym(1 + 1im) = Complex{Float64}[0.905858+0.729914im]

get_ChebyshevIntegral(l, f; symbolic, lambda, alpha)

Computes $$\int_0^1 e^{-i\alpha^{l-1}\lambda x}f(x)\,dx$$ by approximating $f(x)$ using Chebyshev polynomials and obtaining an explicit expression for the integral.

get_ChebyshevTermIntegral(n; symbolic, c)

Computes $\tilde{T}_n(c)$ given by \begin{alignat*}{2} \tilde{T}_n(c) = \int_0^\pi e^{-ic\cos\theta}\cos(n\theta)\sin\theta\,d\theta &= \begin{cases} 2 &\quad\mbox{if $n=0$}\\ 0 &\quad\mbox{if $n=1$}\\ \frac{(-1)^{n+1}-1}{n^2-1} &\quad\mbox{if $n\geq 2$} \end{cases}, &\quad\mbox{if $c=0$}\\ &= \sum_{m=1}^{n+1}\alpha(m,n)\left[\frac{e^{i\lambda}}{(i\lambda)^m} + (-1)^{m+n}\frac{e^{-i\lambda}}{(i\lambda)^m}\right]&\quad\mbox{if $c\neq 0$}, \end{alignat*} where \begin{align*} \alpha(m,n) = \begin{cases} (-1)^n&\quad\mbox{if $m=1$}\\ (-1)^{n+1}n^2&\quad\mbox{if $m=2$}\\ (-1)^{n+m-1}2^{m-2}n\sum_{k=1}^{n-m+2}\binom{m+k-3}{k-1}\prod_{j=k}^{m+k-3}(n-j)&\quad\mbox{else} \end{cases} \end{align*} or its symbolic expression.

get_alpha(m, n)

Computes $\alpha(m,n)$.

In [125]:
function get_alpha(m::Int, n::Int)
    if m == 1
        result = (-1)^n
    elseif m == 2
        result = (-1)^(n+1)*n^2
    else
        sum = 0
        for k = 1:(n-m+2)
            product = 1
            for j = k:(m+k-3)
                product *= (n-j)
            end
            sum += binomial(m+k-3, k-1) * product
        end
        result = (-1)^(n+m-1)*2^(m-2)*n*sum
    end
    return result
end
Out[125]:
get_alpha (generic function with 1 method)

Parameters

  • m, n: Int
    • Indices in $\alpha(m,n)$.

Returns

  • get_alpha: Number
    • Returns the value of $\alpha(m,n)$.

Example

In [126]:
n = 3
println("alpha(1,$n) = $(get_alpha(1, n))")
println("alpha(2,$n) = $(get_alpha(2, n))")
println("alpha(3,$n) = $(get_alpha(3, n))")
alpha(1,3) = -1
alpha(2,3) = 9
alpha(3,3) = -24
In [127]:
function get_ChebyshevTermIntegral(n::Int; symbolic = true, c = symbols("c"))
    if symbolic
        if c == 0
            if n == 0
                expr = 2
            elseif n == 1
                expr = 0
            else
                expr = ((-1)^(n+1)-1)/(n^2-1)
            end
        else
            expr = 0
            for m = 1:(n+1)
                summand = get_alpha(m, n) * (e^(im*c)/(im*c)^m  + (-1)^(m+n)*e^(-im*c)/(im*c)^m)
                expr += summand
            end
        end
        expr = simplify(expr)
        return expr
    else
        function TTilde(c)
            if c == 0
                if n == 0
                    result = 2
                elseif n == 1
                    result = 0
                else
                    result = ((-1)^(n+1)-1)/(n^2-1)
                end
            else
                result = 0
                for i = 1:(n+1)
                    summand = get_alpha(i, n) * (e^(im*c)/(im*c)^i  + (-1)^(i+n)*e^(-im*c)/(im*c)^i)
                    result += summand
                end
            end
            return result
        end
        return TTilde
    end
end
Out[127]:
get_ChebyshevTermIntegral (generic function with 1 method)

Parameters

  • n: Int
    • $n$ in $\tilde{T}_n$.
  • symbolic*: Bool
    • Boolean indicating whether the output is symbolic.
  • c*: SymPy.Sym
    • If symbolic = true, argument of $\tilde{T}_n$. Default to symbols("c").

Returns

  • get_ChebyshevTermintegral: Function or SymPy.Sym
    • Returns $\tilde{T}_n(c)$ as function of $c$ if symbolic = false and as symbolic expression if symbolic = true.

Example

In [128]:
# alpha = e^(2pi*im/1)
# lambda = symbols("lambda")
# c = alpha^(l-1)*lambda/2
chebTermIntSym = get_ChebyshevTermIntegral(2; symbolic = true)
prettyPrint(chebTermIntSym)
Out[128]:
$$\frac{\left(- i c^{2} e^{2 i c} + i c^{2} + 4 c e^{2 i c} + 4 c + 4 i e^{2 i c} - 4 i\right) e^{- i c}}{c^{3}}$$
In [129]:
chebTermInt = get_ChebyshevTermIntegral(2; symbolic = false)
alpha = e^(2pi*im/1)
lambda = 1+im
l = 2
c = alpha^(l-1)*lambda/2
println("chebTermInt($(prettyPrint(c))) = $(chebTermInt(c))")
println("chebTermIntSym($(prettyPrint(c))) = $(evaluate(chebTermIntSym, c))")
chebTermInt(0.5 + 0.5*I) = -0.6684521617501114 - 0.033305777098087574im
chebTermIntSym(0.5 + 0.5*I) = -0.6684521617501128 - 0.033305777098085666im

get_ChebyshevCoefficients(f)

Obtains the coefficients in the Chebyshev approximation of $f$ on $[0,1]$.

Note that the coefficients are obtained by shifting the interval $[0,1]$ to $[-1,1]$ and then back. That is, define $g:[0,1]\to [-1,1]$ by $g(x) = 2x-1$. For $t\in [-1,1]$, define $q(t)=f\circ g^{-1}(t) = f(\frac{t+1}{2}) =: f(x)$ for $x\in [0,1]$. Then the returned coefficients are $\{b_0,\ldots, b_N\}$ in $$f(x) = f\circ g^{-1}(g(x)) = q(g(x)) = q(t) = \sum_{n=0}^N b_n T_n(t) = \sum_{n=0}^N b_n T_n(g(x)) = \sum_{n=0}^N b_n T_n(2x-1)$$ instead of $\{a_0,\ldots, a_N\}$ in $$f(x) = \sum_{n=0}^N a_n T_n(x).$$

In [130]:
function get_ChebyshevCoefficients(f::Union{Function,Number})
    fCheb = ApproxFun.Fun(f, 0..1) # Approximate f on [0,1] using chebyshev polynomials
    chebCoefficients = ApproxFun.coefficients(fCheb) # get coefficients of the Chebyshev polynomial
    return chebCoefficients
end
Out[130]:
get_ChebyshevCoefficients (generic function with 1 method)

Parameters

  • f: Function or Number
    • Function whose Chebyshev coefficients are to be returned.

Returns

  • get_ChebyshevCoefficients: Array of Number
    • Returns $\{b_0,\ldots, b_N\}$.

Example

In [131]:
f(x) = x^2+1
fChebCoeffs = get_ChebyshevCoefficients(f)
Out[131]:
3-element Array{Float64,1}:
 1.375
 0.5  
 0.125

get_ChebyshevIntegral(l, f; symbolic, lambda, alpha)

Computes $$\int_0^1 e^{-i\alpha^{l-1}\lambda x}f(x)\,dx$$ by computing \begin{align*} \frac{1}{2e^{ic}}\int_{-1}^1 e^{-ict} q(t)\,dt = \int_0^1 e^{-i\alpha^{l-1}\lambda x}f(x)\,dx \end{align*} where $c=\frac{\alpha^{l-1}\lambda}{2}$, $q(t) := f\circ g^{-1}(t)$, and \begin{align*} \int_{-1}^1 e^{-ic t}q(t)\,dt &= \int_{-1}^1 e^{-ic t} \sum_{n=0}^N b_n T_n(t)\,dt\\ &= \sum_{n=0}^N b_n \int_{-1}^1 e^{-ic t} T_n(t)\,dt\\ &= \sum_{n=0}^N b_n \int_{-1}^1 e^{-ic t} \cos(n\cdot\cos^{-1}(t))\,dt\\ &= \sum_{n=0}^N b_n \tilde{T}_n(c). \end{align*}

In [132]:
function get_ChebyshevIntegral(l::Number, f::Union{Function, Number}; symbolic = false, lambda = nothing, alpha = nothing)
    fChebCoeffs = get_ChebyshevCoefficients(f)
    # Replace coefficients too close to 0 by 0
    # fChebCoeffs = [if is_approx(x, 0) 0 else x end for x in fChebCoeffs]
    if symbolic
        lambda = symbols("lambda")
        c = alpha^(l-1)*lambda/2
        integralSym = 0
        for m = 1:length(fChebCoeffs)
            fChebCoeff = fChebCoeffs[m]
            if is_approx(fChebCoeff, 0)
                continue
            else
            integralSym += fChebCoeffs[m] * get_ChebyshevTermIntegral(m-1; symbolic = true, c = c)
            end
        end
        integralSym = integralSym/(2*e^(im*c))
        integralSym = simplify(integralSym)
        return integralSym
    else
        if isa(lambda, Void) || isa(alpha, Void)
            throw("lambda, alpha required")
        else
            c = alpha^(l-1)*lambda/2
            integral = 0
            for m = 1:length(fChebCoeffs)
                fChebCoeff = fChebCoeffs[m]
                if is_approx(fChebCoeff, 0)
                    continue
                else
                    integral += fChebCoeff * get_ChebyshevTermIntegral(m-1; symbolic = false)(c)
                end
            end
            integral = integral/(2*e^(im*c))
            return integral
        end
    end
end
Out[132]:
get_ChebyshevIntegral (generic function with 1 method)

Parameters

  • l: Int
    • $l$ in the integral.
  • f: Function or Number
    • $f(x)$ in the integral.
  • symbolic* : Bool
    • Boolean indicating whether the output is symbolic.
  • lambda*: SymPy.Sym or Number
    • $\lambda$ in the integral. Symbolic if symbolic = true and numeric if symbolic = false. Default to symbols("lambda").
  • alpha*: SymPy.Sym or Number
    • $\alpha$ in the integral. Default to symbols("alpha").

Returns

  • get_ChebyshevIntegral : Function or SymPy.Sym
    • Returns the integral as a symbolic expression if symbolic = true and as a function of $\lambda$ if symbolic = false.

Example

In [133]:
alpha = e^(2pi*im/1)
l = 2
# f(x) = x^2+1
f(x) = sin(2*pi*x)
Out[133]:
f (generic function with 1 method)
In [134]:
chebIntSym = simplify(get_ChebyshevIntegral(l, f; symbolic = true, alpha = alpha))
prettyPrint(chebIntSym)
Out[134]:
$$- \frac{0.5 \left(12.564 \lambda^{8} e^{i \lambda} - 12.564 \lambda^{8} - 0.219 i \lambda^{7} e^{i \lambda} - 0.219 i \lambda^{7} + 506.239 \lambda^{6} e^{i \lambda} - 506.239 \lambda^{6} + 318.277 i \lambda^{5} e^{i \lambda} + 318.277 i \lambda^{5} + 12372.486 \lambda^{4} e^{i \lambda} - 12372.486 \lambda^{4} - 120132.078 i \lambda^{3} e^{i \lambda} - 120132.078 i \lambda^{3} + 2222127.374 \lambda^{2} e^{i \lambda} - 2222127.374 \lambda^{2} + 11891179.312 i \lambda e^{i \lambda} + 11891179.312 i \lambda - 23782358.623 e^{i \lambda} + 23782358.623\right) e^{- i \lambda}}{\lambda^{10}}$$
In [135]:
lambda = 1+im
chebInt = get_ChebyshevIntegral(l, f; symbolic = false, lambda = lambda, alpha = alpha)

# Directly compute the integral
g(x) = e^(-im*alpha^(l-1)*lambda*x)
directInt = quadgk(mult_func(g,f), 0, 1)[1]

println("chebIntegral($lambda) = $chebInt")
println("chebIntegralSym($lambda) = $(evaluate.(chebIntSym, lambda))")
println("directIntegral = $directInt")
chebIntegral(1 + 1im) = -0.09279945603348573 + 0.3593425680615589im
chebIntegralSym(1 + 1im) = -0.09279945602468914 + 0.3593425680538266im
directIntegral = -0.09279946736487799 + 0.3593426246245006im

get_FPlusMinus(adjointU; symbolic, generic)

Gets $F^+_\lambda$, $F^-_\lambda$ given by \begin{align*} F^+_\lambda(f) &= \frac{1}{2\pi \Delta(\lambda)} \sum_{l=1}^n\sum_{j=1}(-1)^{(n-1)(l+j)}\det X^{lj}(\lambda)M^+_{1j}(\lambda)\int_0^1 e^{-i\alpha^{l-1}\lambda x}f(x)\,dx,\\ F^-_\lambda(f) &= \frac{-e^{-i\lambda}}{2\pi \Delta(\lambda)} \sum_{l=1}^n\sum_{j=1}(-1)^{(n-1)(l+j)}\det X^{lj}(\lambda)M^-_{1j}(\lambda)\int_0^1 e^{-i\alpha^{l-1}\lambda x}f(x)\,dx. \end{align*} as functions of $f$ or their symbolic expressions.

In [136]:
function get_FPlusMinus(adjointU::VectorBoundaryForm; symbolic = false, generic = false)
    bStar, betaStar = adjointU.M, adjointU.N
    n = size(bStar)[1]
    if symbolic
        lambda = symbols("lambda")
        (MPlusSym, MMinusSym) = get_MPlusMinus(adjointU; symbolic = true, generic = generic)
        deltaSym = get_delta(adjointU; symbolic = true, generic = generic)
        if generic
            alpha = symbols("alpha")
            c = symbols("c")
            FT = SymFunction("FT[f]")(c)
            sumPlusSymGeneric = 0
            sumMinusSymGeneric = 0
            for l = 1:n
                summandPlusSymGeneric = 0
                summandMinusSymGeneric = 0
                for j = 1:n
                    XljSym = get_Xlj(adjointU, l, j; symbolic = true, generic = true)
                    integralSymGeneric = subs(FT, c, alpha^(l-1)*lambda)
                    summandPlusSymGeneric += (-1)^((n-1)*(l+j)) * SymPy.det(XljSym) * MPlusSym[1,j] * integralSymGeneric
                    summandMinusSymGeneric += (-1)^((n-1)*(l+j)) * SymPy.det(XljSym) * MMinusSym[1,j] * integralSymGeneric
                end
                sumPlusSymGeneric += summandPlusSymGeneric
                sumMinusSymGeneric += summandMinusSymGeneric
            end
            FPlusSymGeneric = simplify(1/(2*PI*deltaSym)*sumPlusSymGeneric)
            FMinusSymGeneric = simplify((-e^(-im*lambda))/(2*PI*deltaSym)*sumMinusSymGeneric)
            return (FPlusSymGeneric, FMinusSymGeneric)
        else
            alpha = e^(2*PI*im/n)
            function FPlusSym(f::Union{Function, Number})
                sumPlusSym = 0
                for l = 1:n
                    summandPlusSym = 0
                    for j = 1:n
                        XljSym = get_Xlj(adjointU, l, j; symbolic = true)
                        integralSym = get_ChebyshevIntegral(l, f; symbolic = true, lambda = lambda, alpha = alpha)
                        summandPlusSym += (-1)^((n-1)*(l+j)) * SymPy.det(XljSym) * MPlusSym[1,j] * integralSym
                    end
                    sumPlusSym += summandPlusSym
                end
                return simplify(1/(2*PI*deltaSym)*sumPlusSym)
            end
            function FMinusSym(f::Union{Function, Number})
                sumMinusSym = 0
                for l = 1:n
                    summandMinusSym = 0
                    for j = 1:n
                        XljSym = get_Xlj(adjointU, l, j; symbolic = true)
                        c = alpha^(l-1)*lambda/2
                        integralSym = get_ChebyshevIntegral(l, f; symbolic = true, lambda = lambda, alpha = alpha)
                        summandMinusSym += (-1)^((n-1)*(l+j)) * SymPy.det(XljSym) * MMinusSym[1,j] * integralSym
                    end
                    sumMinusSym += summandMinusSym
                end
                return simplify((-e^(-im*lambda))/(2*PI*deltaSym)*sumMinusSym)
            end
            return (FPlusSym, FMinusSym)
            end
    else
        alpha = e^(2pi*im/n)
        (MPlus, MMinus) = get_MPlusMinus(adjointU; symbolic = false)
        function FPlus(lambda::Number, f::Union{Function, Number})
            MPlusLambda, MMinusLambda = MPlus(lambda), MMinus(lambda)
            M = get_M(adjointU; symbolic = false)
            MLambda = convert(Array{Complex}, M(lambda))
            deltaLambda = det(MLambda) # or deltaLambda = (get_delta(adjointU))(lambda)
            sumPlus = 0
            for l = 1:n
                summandPlus = 0
                for j = 1:n
                    Xlj = get_Xlj(adjointU, l, j; symbolic = false)
                    XljLambda = convert(Array{Complex}, Xlj(lambda))
                    integral = get_ChebyshevIntegral(l, f; symbolic = false, lambda = lambda, alpha = alpha)
                    summandPlus += (-1)^((n-1)*(l+j)) * det(XljLambda) * MPlusLambda[1,j] * integral
                end
                sumPlus += summandPlus
            end
            return 1/(2pi*deltaLambda)*sumPlus
        end
        function FMinus(lambda::Number, f::Union{Function, Number})
            MPlusLambda, MMinusLambda = MPlus(lambda), MMinus(lambda)
            M = get_M(adjointU; symbolic = false)
            MLambda = convert(Array{Complex}, M(lambda))
            deltaLambda = det(MLambda) # or deltaLambda = (get_delta(adjointU))(lambda)
            sumMinus = 0
            for l = 1:n
                summandMinus = 0
                for j = 1:n
                    Xlj = get_Xlj(adjointU, l, j)
                    XljLambda = convert(Array{Complex}, Xlj(lambda))
                    integral = get_ChebyshevIntegral(l, f; symbolic = false, lambda = lambda, alpha = alpha)
                    summandMinus += (-1)^((n-1)*(l+j)) * det(XljLambda) * MMinusLambda[1,j] * integral
                end
                sumMinus += summandMinus
            end
            return (-e^(-im*lambda))/(2pi*deltaLambda)*sumMinus
        end
        return (FPlus, FMinus)
    end
end
Out[136]:
get_FPlusMinus (generic function with 1 method)

Parameters

  • adjointU: VectorBoundaryForm
    • Adjoint vector boundary form associated with the matrices $b^\star$ and $\beta^\star$ in the definition of $M(\lambda)$.
  • symbolic*: Bool
    • Boolean indicating whether the output is symbolic.
  • generic*: Bool
    • If symbolic = true, boolean indicating whether $f$ and $\alpha=e^{2\pi i/n}$ are kept as generic symbols.

Returns

  • get_FPlusMinusLambda: Tuple of Function or SymPy.Sym
    • Returns $F_\lambda^+$, $F_\lambda^-$ as symbolic expressions of $\lambda$ if symbolic = true (where $\text{FT}[f]$ indicates the Fourier transform integral of $f$, $\int_0^1 e^{-i\alpha^{l-1}\lambda x}f(x)\,dx$) and as functions in $\lambda$ and $f$ if symbolic = false.

Example

In [137]:
t = symbols("t")
symPFunctions = [1 t+1 t^2+t+1]
interval = (0, 1)
symL = SymLinearDifferentialOperator(symPFunctions, interval, t)
L = get_L(symL)

M = [1 0; 2 0]
N = [0 2; 0 1]
U = VectorBoundaryForm(M, N)

adjointU = get_adjointU(L, U)
Out[137]:
VectorBoundaryForm(Complex[-1.0-0.0im 0.0-0.0im; 0.0-0.0im 0.0-0.0im], Complex[0.0-0.0im 0.0-0.0im; 2.0-0.0im -1.0-0.0im])
In [138]:
# generic f
(FPlusSymGeneric, FMinusSymGeneric) = get_FPlusMinus(adjointU; symbolic = true, generic = true)
prettyPrint(FPlusSymGeneric)
Out[138]:
$$\frac{0.5 \left(\left(i \lambda + 2\right) \operatorname{FT[f]}{\left (\alpha \lambda \right )} e^{i \alpha \lambda} - \left(i \alpha \lambda + 2\right) \operatorname{FT[f]}{\left (\lambda \right )} e^{i \lambda}\right)}{\pi \left(\left(i \lambda + 2\right) e^{i \alpha \lambda} - \left(i \alpha \lambda + 2\right) e^{i \lambda}\right)}$$
In [139]:
f(x) = x^2-1

# Keep lambda as a free symbol
(FPlusSym, FMinusSym) = get_FPlusMinus(adjointU; symbolic = true)
prettyPrint(FPlusSym(f))
Out[139]:
$$\frac{- 0.625 i \lambda^{3} e^{\frac{3 i \lambda}{2}} \sin{\left (\frac{\lambda}{2} \right )} - 0.625 i \lambda^{3} e^{\frac{i \lambda}{2}} \sin{\left (\frac{\lambda}{2} \right )} - 0.188 \lambda^{3} e^{2 i \lambda} + 0.188 \lambda^{3} + 1.25 \lambda^{2} e^{\frac{3 i \lambda}{2}} \sin{\left (\frac{\lambda}{2} \right )} - 1.25 \lambda^{2} e^{\frac{i \lambda}{2}} \sin{\left (\frac{\lambda}{2} \right )} - 0.375 i \lambda^{2} e^{2 i \lambda} + 0.75 i \lambda^{2} e^{i \lambda} - 0.375 i \lambda^{2} - \lambda e^{2 i \lambda} + \lambda - 2 i e^{2 i \lambda} + 4 i e^{i \lambda} - 2 i}{\pi \lambda^{3} \left(i \lambda e^{2 i \lambda} + i \lambda - 2 e^{2 i \lambda} + 2\right)}$$
In [140]:
lambda = 1+im
(FPlus, FMinus) = get_FPlusMinus(adjointU; symbolic = false)
println("FPlus($lambda, f) = $(FPlus(lambda, f))")
println("FMinus($lambda, f) = $(FMinus(lambda, f))")
println("FPlusSym($lambda, f) = $(evaluate.(FPlusSym(f), lambda))")
println("FMinusSym($lambda, f) = $(evaluate.(FMinusSym(f), lambda))")
FPlus(1 + 1im, f) = -0.030615744795935648 - 0.011678556508991562im
FMinus(1 + 1im, f) = 0.1091262126064784 - 0.07682555657657669im
FPlusSym(1 + 1im, f) = -0.030615744795935648 - 0.011678556508991567im
FMinusSym(1 + 1im, f) = 0.10912621260647842 - 0.07682555657657673im
In [141]:
t = symbols("t")
symPFunctions = [1 0 0 0]
interval = (0, 1)
symL = SymLinearDifferentialOperator(symPFunctions, interval, t)
L = get_L(symL)

M = [1 0 0; 0 0 0; 0 -1/2 0]
N = [0 0 0; 1 0 0; 0 1 0]
U = VectorBoundaryForm(M, N)

adjointU = get_adjointU(L, U)
Out[141]:
VectorBoundaryForm(Complex[0.0-0.0im 1.0-0.0im 0.0-0.0im; -1.0-0.0im 0.0-0.0im 0.0-0.0im; 0.0-0.0im 0.0-0.0im 0.0-0.0im], Complex[0.0-0.0im -0.5-0.0im 0.0-0.0im; 0.0-0.0im 0.0-0.0im 0.0-0.0im; 1.0-0.0im 0.0-0.0im 0.0-0.0im])
In [142]:
delta = get_delta(adjointU; symbolic = true, generic = true)
prettyPrint(simplify(delta))
# (FPlusSymGeneric, FMinusSymGeneric) = get_FPlusMinus(adjointU; symbolic = true, generic = true)
# prettyPrint(simplify(FPlusSymGeneric))
Out[142]:
$$- i \lambda \left(0.5 \alpha^{2} e^{i \lambda} - 0.5 \alpha^{2} e^{i \alpha \lambda} - \alpha^{2} e^{i \lambda \left(\alpha^{2} + 1\right)} + \alpha^{2} e^{i \alpha \lambda \left(\alpha + 1\right)} - 0.5 \alpha e^{i \lambda} + 0.5 \alpha e^{i \alpha^{2} \lambda} + \alpha e^{i \lambda \left(\alpha + 1\right)} - \alpha e^{i \alpha \lambda \left(\alpha + 1\right)} + 0.5 e^{i \alpha \lambda} - 0.5 e^{i \alpha^{2} \lambda} - e^{i \lambda \left(\alpha + 1\right)} + e^{i \lambda \left(\alpha^{2} + 1\right)}\right) e^{- i \lambda \left(\alpha^{2} + \alpha + 1\right)}$$

get_gamma(a, n, zeroList; infty, nGon)

Computes the contour $\Gamma$ given by \begin{align*} \Gamma &:= \Gamma_0\cup \Gamma_a, \end{align*} where \begin{align*} \Gamma_a^{\pm} &:= \partial(\{\lambda\in\mathbb{C}^{\pm}:\, \Re(a\lambda^n)>0\}\setminus \bigcup_{\substack{\sigma\in\mathbb{C};\\\Delta(\sigma)=0}} D(\sigma, 2\epsilon))\quad\mbox{($D$ for disk)},\\ \Gamma_a &:= \Gamma_a^+\cup \Gamma_a^-,\\ \Gamma_0^+ &:= \bigcup_{\substack{\sigma\in\overline{\mathbb{C}^+};\\ \Delta(\sigma)=0}} C(\sigma, \epsilon)\quad\mbox{($C$ for circle)},\\ \Gamma_0^- &:= \bigcup_{\substack{\sigma\in\mathbb{C}^-;\\ \Delta(\sigma)=0}} C(\sigma, \epsilon),\\ \Gamma_0 &:= \Gamma_0^+\cup \Gamma_0^-. \end{align*}

get_gammaAAngles(a, n; symbolic)

Finds the angles (in $[-2\pi, 2\pi)$) representing the lines through the origin that mark the beginning and end of the sectors encircled by $\Gamma_a$, boundary of the domain $\{\lambda\in \mathbb{C}: \Re(a\lambda^n)>0\}$.

Note that we choose the interval $[-2\pi, 2\pi)$ to ensure that "z is in a sector" if and only if "angle(z) is greater than or equal to the start of the sector and smaller than or equal to the end of the sector.

In [143]:
function get_gammaAAngles(a::Number, n::Int; symbolic = false)
    # thetaA = argument(a)
    thetaA = angle(a)
    if symbolic
        thetaStartList = Array{SymPy.Sym}(n) # List of angles that characterize where domain sectors start
        thetaEndList = Array{SymPy.Sym}(n) # List of angles that characterize where domain sectors end
        k = symbols("k")
        counter = 0
        while (2pi*counter + pi/2 - thetaA)/n < 2pi
        # Substituting counter for k
        # while SymPy.N(subs((2PI*k + PI/2 - thetaA)/n, k, counter)) < 2pi
            thetaStart = (2*PI*counter - PI/2 - rationalize(thetaA/pi)*PI)/n
            thetaEnd = (2*PI*counter + PI/2 - rationalize(thetaA/pi)*PI)/n
            counter += 1
            thetaStartList[counter] = thetaStart
            thetaEndList[counter] = thetaEnd
        end
    else
        thetaStartList = Array{Number}(n)
        thetaEndList = Array{Number}(n)
        k = 0
        while (2pi*k + pi/2 - thetaA)/n < 2pi
            thetaStart = (2pi*k - pi/2 - thetaA)/n
            thetaEnd = (2pi*k + pi/2 - thetaA)/n
            k += 1
            thetaStartList[k] = thetaStart
            thetaEndList[k] = thetaEnd
        end
    end
    return (thetaStartList, thetaEndList)
end
Out[143]:
get_gammaAAngles (generic function with 1 method)

Parameters

  • a: Number
    • $a$ in $\Gamma_a$, given along with $S$, $f$, and $B$ as parameters of get_input().
  • n: Int
    • $n$ in the definition of $\Gamma_a^{\pm}$.
  • symbolic*: Bool
    • Boolean indicating whether the output is symbolic.

Returns

  • get_gammaAAngles: Tuple{Array, Array}
    • Returns a tuple containing an array of angles in $[-2\pi, 2\pi)$ that characterize the starts of the sectors and an array of angles that characterize the ends of the sectors.

Example

In [144]:
n = 2
a = 1
gammaAAnglesSym = get_gammaAAngles(a, n; symbolic = true)
println("n=$n, a=$a, gammaAAnglesSym = $gammaAAnglesSym")

gammaAAngles = get_gammaAAngles(a, n; symbolic = false)
println("n=$n, a=$a, gammaAAngles = $gammaAAngles")

n = 3
a = im
gammaAAnglesSym = get_gammaAAngles(a, n; symbolic = true)
println("n=$n, a=$a, gammaAAnglesSym = $gammaAAnglesSym")

n = 3
a = -im
gammaAAnglesSym = get_gammaAAngles(a, n; symbolic = true)
println("n=$n, a=$a, gammaAAnglesSym = $gammaAAnglesSym")
n=2, a=1, gammaAAnglesSym = (SymPy.Sym[-pi/4, 3*pi/4], SymPy.Sym[pi/4, 5*pi/4])
n=2, a=1, gammaAAngles = (Number[-0.785398, 2.35619], Number[0.785398, 3.92699])
n=3, a=im, gammaAAnglesSym = (SymPy.Sym[-pi/3, pi/3, pi], SymPy.Sym[0, 2*pi/3, 4*pi/3])
n=3, a=0 - 1im, gammaAAnglesSym = (SymPy.Sym[0, 2*pi/3, 4*pi/3], SymPy.Sym[pi/3, pi, 5*pi/3])

get_gammaAAnglesSplit(a, n; symbolic)

On top of the sectors characterized by the array of start angles and the array of end angles obtained via get_gammaAAngles(), splits the sectors that contain the real line.

In [145]:
function get_gammaAAnglesSplit(a::Number, n::Int; symbolic = false)
    (thetaStartList, thetaEndList) = get_gammaAAngles(a, n; symbolic = symbolic)
    # Split sectors that contain the positive half of the real line (angle = 0)
    zeroIndex = find(i -> ((is_approxLess(thetaStartList[i], 0) && is_approxLess(0, thetaEndList[i]))), 1:length(thetaStartList))
    if !isempty(zeroIndex)
        index = zeroIndex[1]
        # Insert 0 after thetaStart
        splice!(thetaStartList, (index+1):index, 0)
        # Insert 0 before thetaEnd
        splice!(thetaEndList, index:(index-1), 0)
    end
    # Split sectors that contain the negative half of the real line (angle = pi)
    piIndex = find(i -> ((is_approxLess(thetaStartList[i], pi) && is_approxLess(pi, thetaEndList[i]))), 1:length(thetaStartList))
    if !isempty(piIndex)
        index = piIndex[1]
        if symbolic
            # Insert pi after thetaStart
            splice!(thetaStartList, (index+1):index, pi)
            # Insert pi before thetaEnd
            splice!(thetaEndList, index:(index-1), pi)
        else
            # Use pi*1 instead of pi to avoid "<= not defined for Irrational{:pi}" error in get_gamma()
            splice!(thetaStartList, (index+1):index, pi*1)
            splice!(thetaEndList, index:(index-1), pi*1)
        end
    end
    return (thetaStartList, thetaEndList)
end
Out[145]:
get_gammaAAnglesSplit (generic function with 1 method)

Parameters

  • a: Number
    • $a$ in $\Gamma_a$, given along with $S$, $f$, and $B$ as parameters of get_input().
  • n: Int
    • $n$ in the definition of $\Gamma_a^{\pm}$.
  • symbolic*: Bool
    • Boolean indicating whether the output is symbolic.

Returns

  • get_gammaAAnglesSplit: Tuple{Array, Array}
    • Returns a tuple containing an array of angles in $[-2\pi, 2\pi)$ that characterize the starts of the sectors and an array of angles that characterize the ends of the sectors. Compared to the output of get_gammaAAngles(), the arrays of angles reflect the fact that sectors containing the real line are splitted into upper half and lower half.

Example

In [146]:
n = 2
a = 1
gammaAAnglesSplitSym = get_gammaAAnglesSplit(a, n; symbolic = true)
println("n=$n, a=$a, gammaAAnglesSplitSym = $gammaAAnglesSplitSym")
gammaAAnglesSplit = get_gammaAAnglesSplit(a, n; symbolic = false)
println("n=$n, a=$a, gammaAAnglesSplit = $gammaAAnglesSplit")

n = 3
a = im
gammaAAnglesSplitSym = get_gammaAAnglesSplit(a, n; symbolic = true)
println("n=$n, a=$a, gammaAAnglesSplitSym = $gammaAAnglesSplitSym")
gammaAAnglesSplit = get_gammaAAnglesSplit(a, n; symbolic = false)
println("n=$n, a=$a, gammaAAnglesSplit = $gammaAAnglesSplit")
n=2, a=1, gammaAAnglesSplitSym = (SymPy.Sym[-pi/4, 0, 3*pi/4, pi], SymPy.Sym[0, pi/4, pi, 5*pi/4])
n=2, a=1, gammaAAnglesSplit = (Number[-0.785398, 0, 2.35619, 3.14159], Number[0, 0.785398, 3.14159, 3.92699])
n=3, a=im, gammaAAnglesSplitSym = (SymPy.Sym[-pi/3, pi/3, pi], SymPy.Sym[0, 2*pi/3, 4*pi/3])
n=3, a=im, gammaAAnglesSplit = (Number[-1.0472, 1.0472, 3.14159], Number[0.0, 2.0944, 4.18879])

pointOnSector(z, sectorAngles)

Determines whether a point $z$ is on the boundary of a sector characterized by a start angle and an end angle.

In [147]:
function pointOnSector(z::Number, sectorAngles::Tuple{Number, Number})
    (startAngle, endAngle) = sectorAngles
    return is_approx(argument(z), startAngle) || is_approx(argument(z), endAngle) || is_approx(angle(z), startAngle) || is_approx(angle(z), endAngle)
end
Out[147]:
pointOnSector (generic function with 1 method)

Parameters

  • z: Number
    • Point in the complex plane.
  • sectorAngles: Tuple{Number, Number}
    • Pair of start and end angles characterizing a sector.

Returns

  • pointOnSector: Bool
    • Returns true if z is on the boundary of the sector given by sectorAngles and false otherwise.

Example

In [148]:
z = 1+im
sectorAngles = (-pi/4, pi/4)
pointOnSector(z, sectorAngles)
Out[148]:
true

pointInSector(z, sectorAngles)

Determines whether a point $z$ is in the interior of a sector characterized by a start angle and an end angle.

In [149]:
function pointInSector(z::Number, sectorAngles::Tuple{Number, Number})
    (startAngle, endAngle) = sectorAngles
    # First check if z is on the sector boundary
    if pointOnSector(z, sectorAngles)
        return false
    else
        # angle(z) would work if it's in the sector with positive real parts and both positive and negative imaginary parts; argument(z) would work if it's in the sector with negative real parts and both positive and negative imaginary parts
        return (angle(z) > startAngle && angle(z) < endAngle) || (argument(z) > startAngle && argument(z) < endAngle) # no need to use is_approxLess because the case of approximatedly equal is already checked in pointOnSector
    end
end
Out[149]:
pointInSector (generic function with 1 method)

Parameters

  • z: Number
    • Point in the complex plane.
  • sectorAngles: Tuple{Number, Number}
    • Pair of start and end angles characterizing a sector.

Returns

  • pointInSector: Bool
    • Returns true if z is interior to the sector given by sectorAngles and false otherwise.

Example

In [150]:
z = 1+im
sectorAngles = (-pi/4, pi/4)
println("pointInSector($z, $sectorAngles) = $(pointInSector(z, sectorAngles))")

z = 1
println("pointInSector($z, $sectorAngles) = $(pointInSector(z, sectorAngles))")

z = -1
println("pointInSector($z, $sectorAngles) = $(pointInSector(z, sectorAngles))")
pointInSector(1 + 1im, (-0.7853981633974483, 0.7853981633974483)) = false
pointInSector(1, (-0.7853981633974483, 0.7853981633974483)) = true
pointInSector(-1, (-0.7853981633974483, 0.7853981633974483)) = false

pointExSector(z, sectorAngles)

Determines whether a point $z$ is in the exterior of a sector characterized by a start angle and an end angle.

In [151]:
function pointExSector(z::Number, sectorAngles::Tuple{Number, Number})
    return !pointOnSector(z, sectorAngles) && !pointInSector(z, sectorAngles)
end
Out[151]:
pointExSector (generic function with 1 method)

Parameters

  • z: Number
    • Point in the complex plane.
  • sectorAngles: Tuple{Number, Number}
    • Pair of start and end angles characterizing a sector.

Returns

  • pointExSector: Bool
    • Returns true if z is exterior to the sector given by sectorAngles and false otherwise.

Example

In [152]:
z = 1+im
sectorAngles = (-pi/4, pi/4)
println("pointExSector($z, $sectorAngles) = $(pointExSector(z, sectorAngles))")

z = 1
println("pointExSector($z, $sectorAngles) = $(pointExSector(z, sectorAngles))")

z = -1
println("pointExSector($z, $sectorAngles) = $(pointExSector(z, sectorAngles))")
pointExSector(1 + 1im, (-0.7853981633974483, 0.7853981633974483)) = false
pointExSector(1, (-0.7853981633974483, 0.7853981633974483)) = false
pointExSector(-1, (-0.7853981633974483, 0.7853981633974483)) = true

get_epsilon(zeroList, a, n)

Given a list of zeroes of $\Delta(\lambda)$, using the arrays of angles that characterize the starts and ends of sectors, computes an appropriate value for the radius $\epsilon$ of the circle to be drawn around each zero of $\Delta(\lambda)$ in the contours $\Gamma_0^{\pm}$. This is the minimum of pairwise distances between zeroes that are not interior to any sector (since interior zeroes would not matter in any way) and the distances from any of these zeroes to any line that mark the boundary of some sector.

In [153]:
function get_epsilon(zeroList::Array, a::Number, n::Int)
    (thetaStartList, thetaEndList) = get_gammaAAnglesSplit(a, n; symbolic = false)
    thetaStartEndList = collect(Iterators.flatten([thetaStartList, thetaEndList]))
    truncZeroList = []
    for zero in zeroList
        # If zero is interior to any sector, discard it
        if any(i -> pointInSector(zero, (thetaStartList[i], thetaEndList[i])), 1:n)
        else # If not, append it to truncZeroList
            append!(truncZeroList, zero)
        end
    end
    # List of distance between each zero and each line marking the boundary of some sector
    pointLineDistances = [get_distancePointLine(z, theta) for z in zeroList for theta in thetaStartEndList]
    if length(truncZeroList)>1
        # List of distance between every two zeroes
        pairwiseDistances = [norm(z1-z2) for z1 in zeroList for z2 in truncZeroList]
    else
        pairwiseDistances = []
    end
    distances = collect(Iterators.flatten([pairwiseDistances, pointLineDistances]))
    # Distances of nearly 0 could be instances where the zero is actually on some sector boundary
    distances = filter(x -> !is_approx(x, 0), distances)
    epsilon = minimum(distances)/5
    return epsilon
end
Out[153]:
get_epsilon (generic function with 1 method)

Parameters

  • zeroList: Array of Number
    • List of zeroes of $\Delta(\lambda)$. Found by human input with the aid of plot_levelCurves().
  • a: Number
    • $a$ in $\Gamma_a$, given along with $S$, $f$, and $B$ as parameters of get_input().
  • n: Int
    • $n$ in the definition of $\Gamma_a^{\pm}$.

Returns

  • get_epsilon: Number
    • Returns one-third the minimum of the distances between any two exterior zeroes of $\Delta(\lambda)$ and the distances between any exterior zero to any line marking the boundary of some sector.

Example

In [154]:
n = 2
a = 1
zeroList = [1+sqrt(3)*im, 2+2*sqrt(3)*im, 0+0*im, 0+5*im, 0-5*im]
get_epsilon(zeroList, a, n)
Out[154]:
0.10352761804100832

get_nGonAroundZero(zero, epsilon, n)

Given a zero of $\Delta(\lambda)$, returns an array of $n$ complex numbers representing the vertices of an $n$-gon around the zero in the complex plane; each vertex is of distance $\epsilon$ from the zero.

In [155]:
function get_nGonAroundZero(zero::Number, epsilon::Number, n::Int)
    z = zero
    theta = argument(zero)
    deltaAngle = 2pi/n
    vertices = []
    for i = 1:n
        newAngle = pi-deltaAngle*(i-1)
        vertex = z + epsilon*e^(im*(theta+newAngle))
        append!(vertices, vertex)
    end
    # vertices = vcat(vertices, vertices[1])
    return vertices
end
Out[155]:
get_nGonAroundZero (generic function with 1 method)

Parameters

  • zero: Number
    • A root of $\Delta(\lambda)$.
  • epsilon: Number
    • Output of get_epsilon(). Distance between each vertex of the $n$-gon from zero.
  • n: Int
    • $n$ in $n$-gon.

Returns

  • get_nGonAroundZero: Array of Number
    • Returns an array of $n$ points that are the vertices of the $n$-gon in the complex plane.

Example

In [156]:
zero = im
epsilon = 1
n = 4
prettyPrint.(get_nGonAroundZero(zero, epsilon, n))
Out[156]:
\begin{bmatrix}0\\-1 + i\\2 i\\1 + i\end{bmatrix}

get_gamma(a, n, zeroList; infty, nGon)

Finds the contours $\Gamma_a^+$, $\Gamma_a^-$, $\Gamma_0^+$, $\Gamma_0^-$ as arrays of points ordered in the order they will be integrated over.

In [157]:
function get_gamma(a::Number, n::Int, zeroList::Array; infty = INFTY, nGon = 8)
    (thetaStartList, thetaEndList) = get_gammaAAnglesSplit(a, n; symbolic = false)
    nSplit = length(thetaStartList)
    gammaAPlus, gammaAMinus, gamma0Plus, gamma0Minus = [], [], [], []
    epsilon = get_epsilon(zeroList, a, n)
    for i in 1:nSplit
        thetaStart = thetaStartList[i]
        thetaEnd = thetaEndList[i]
        # Initialize the boundary of each sector with the ending boundary, the origin, and the starting boundary (start and end boundaries refer to the order in which the boundaries are passed if tracked counterclockwise)
        initialPath = [infty*e^(im*thetaEnd), 0+0*im, infty*e^(im*thetaStart)]
        initialPath = convert(Array{Complex{Float64}}, initialPath)
        if thetaStart >= 0 && thetaStart <= pi && thetaEnd >= 0 && thetaEnd <= pi # if in the upper half plane, push the boundary path to gamma_a+
            push!(gammaAPlus, initialPath) # list of lists
        else # if in the lower half plane, push the boundary path to gamma_a-
            push!(gammaAMinus, initialPath)
        end
    end
    # Sort the zeroList by norm, so that possible zero at the origin comes last. We need to leave the origin in the initial path unchanged until we have finished dealing with all non-origin zeros because we use the origin in the initial path as a reference point to decide where to insert the deformed path
    zeroList = sort(zeroList, lt=(x,y)->!isless(norm(x), norm(y)))
    for zero in zeroList
        # println(zero)
        # If zero is not at the origin
        if !is_approx(zero, 0+0*im)
            # Draw an n-gon around it
            vertices = get_nGonAroundZero(zero, epsilon, nGon)
            # If zero is on the boundary of some sector
            if any(i -> pointOnSector(zero, (thetaStartList[i], thetaEndList[i])), 1:nSplit)
                # Find which sector(s) zero is on
                indices = find(i -> pointOnSector(zero, (thetaStartList[i], thetaEndList[i])), 1:nSplit)
                # If zero is on the boundary of one sector
                if length(indices) == 1
                    # if vertices[2] is interior to any sector, include vertices on the other half of the n-gon in the contour approximation
                    z0 = vertices[2]
                    if any(i -> pointInSector(z0, (thetaStartList[i], thetaEndList[i])), 1:nSplit)
                        # Find which sector vertices[2] is in
                        index = find(i -> pointInSector(z0, (thetaStartList[i], thetaEndList[i])), 1:nSplit)[1]
                    else # if vertices[2] is exterior, include vertices on this half of the n-gon in the contour approximation
                        # Find which sector vertices[length(vertices)] is in
                        z1 = vertices[length(vertices)]
                        index = find(i -> pointInSector(z1, (thetaStartList[i], thetaEndList[i])), 1:nSplit)[1]
                    end
                    thetaStart = thetaStartList[index]
                    thetaEnd = thetaEndList[index]
                    # Find all vertices exterior to or on the boundary of this sector, which would form the nGonPath around the zero
                    nGonPath = vertices[find(vertex -> !pointInSector(vertex, (thetaStart, thetaEnd)), vertices)]
                    # If this sector is in the upper half plane, deform gamma_a+
                    if thetaStart >= 0 && thetaStart <= pi && thetaEnd >= 0 && thetaEnd <= pi
                        gammaAPlusIndex = find(path -> (is_approx(argument(zero), argument(path[1])) || is_approx(argument(zero), argument(path[length(path)]))), gammaAPlus)[1]
                        deformedPath = copy(gammaAPlus[gammaAPlusIndex])
                        if any(i -> is_approx(argument(zero), thetaStartList[i]) || is_approx(angle(zero), thetaStartList[i]), 1:nSplit) # if zero is on the starting boundary, insert the n-gon path after 0+0*im
                            splice!(deformedPath, length(deformedPath):(length(deformedPath)-1), nGonPath)
                        else # if zero is on the ending boundary, insert the n-gon path before 0+0*im
                            splice!(deformedPath, 2:1, nGonPath)
                        end
                        deformedPath = convert(Array{Complex{Float64}}, deformedPath)
                        gammaAPlus[gammaAPlusIndex] = deformedPath
                    else # if sector is in the lower half plane, deform gamma_a-
                        # # Find all vertices interior to or on the boundary of this sector, which would form the nGonPath around the zero
                        # nGonPath = vertices[find(vertex -> !pointExSector(vertex, (thetaStart, thetaEnd)), vertices)]
                        gammaAMinusIndex = find(path -> (is_approx(argument(zero), argument(path[1])) || is_approx(argument(zero), argument(path[length(path)]))), gammaAMinus)[1]
                        deformedPath = copy(gammaAMinus[gammaAMinusIndex])
                        if any(i -> is_approx(argument(zero), thetaStartList[i]) || is_approx(angle(zero), thetaStartList[i]), 1:nSplit) # if zero is on the starting boundary, insert the n-gon path after 0+0*im
                            splice!(deformedPath, length(deformedPath):(length(deformedPath)-1), nGonPath)
                        else # if zero is on the ending boundary, insert the n-gon path before 0+0*im
                            splice!(deformedPath, 2:1, nGonPath) 
                        end
                        deformedPath = convert(Array{Complex{Float64}}, deformedPath)
                        gammaAMinus[gammaAMinusIndex] = deformedPath
                    end
                else # If zero is on the boundary of two sectors, then it must be on the real line, and we need to deform two sectors
                    # Find out which vertices are in the lower half plane
                    nGonPath = vertices[find(vertex -> !pointInSector(vertex, (0, pi)), vertices)]
                    for index in indices
                        thetaStart = thetaStartList[index]
                        thetaEnd = thetaEndList[index]
                        # If this is the sector in the upper half plane, deform gamma_a+
                        if thetaStart >= 0 && thetaStart <= pi && thetaEnd >= 0 && thetaEnd <= pi
                            gammaAPlusIndex = find(path -> (is_approx(argument(zero), argument(path[1])) || is_approx(argument(zero), argument(path[length(path)]))), gammaAPlus)[1]
                            deformedPath = copy(gammaAPlus[gammaAPlusIndex])
                            if is_approx(argument(zero), argument(deformedPath[length(deformedPath)])) # if zero is on the starting boundary, insert the n-gon path after 0+0*im
                                splice!(deformedPath, length(deformedPath):(length(deformedPath)-1), nGonPath)
                            else # if zero is on the ending boundary, insert the n-gon path before 0+0*im
                                splice!(deformedPath, 2:1, nGonPath)
                            end
                            deformedPath = convert(Array{Complex{Float64}}, deformedPath)
                            gammaAPlus[gammaAPlusIndex] = deformedPath
                        else # If this is the sector in the lower half plane, deform gamma_a-
                            gammaAMinusIndex = find(path -> (is_approx(argument(zero), argument(path[1])) || is_approx(argument(zero), argument(path[length(path)]))), gammaAMinus)[1]
                            deformedPath = copy(gammaAMinus[gammaAMinusIndex])
                            if is_approx(argument(zero), argument(deformedPath[length(deformedPath)])) # if zero is on the starting boundary, insert the n-gon path after 0+0*im
                                splice!(deformedPath, length(deformedPath):(length(deformedPath)-1), nGonPath)
                            else # if zero is on the ending boundary, insert the n-gon path before 0+0*im
                                splice!(deformedPath, 2:1, nGonPath)
                            end
                            deformedPath = convert(Array{Complex{Float64}}, deformedPath)
                            gammaAMinus[gammaAMinusIndex] = deformedPath
                        end
                    end
                end
                # Sort each sector's path in the order in which they are integrated over
                gammaAs = [gammaAPlus, gammaAMinus]
                for j = 1:length(gammaAs)
                    gammaA = gammaAs[j]
                    for k = 1:length(gammaA)
                        inOutPath = gammaA[k]
                        originIndex = find(x->x==0+0*im, inOutPath)[1]
                        inwardPath = inOutPath[1:(originIndex-1)]
                        outwardPath = inOutPath[(originIndex+1):length(inOutPath)]
                        # Sort the inward path and outward path
                        if length(inwardPath) > 0
                            inwardPath = sort(inwardPath, lt=(x,y)->!isless(norm(x), norm(y)))
                        end
                        if length(outwardPath) > 0
                            outwardPath = sort(outwardPath, lt=(x,y)->isless(norm(x), norm(y)))
                        end
                        inOutPath = vcat(inwardPath, 0+0*im, outwardPath)
                        inOutPath = convert(Array{Complex{Float64}}, inOutPath)
                        gammaA[k] = inOutPath
                    end
                    gammaAs[j] = gammaA 
                end
                gammaAPlus, gammaAMinus = gammaAs[1], gammaAs[2]
            # If zero is interior to any sector (after splitting by real line), ignore it
            # If zero is exterior to the sectors, avoid it
            elseif all(i -> pointExSector(zero, (thetaStartList[i], thetaEndList[i])), 1:nSplit)
                nGonPath = vcat(vertices, vertices[1]) # counterclockwise
                nGonPath = convert(Array{Complex{Float64}}, nGonPath)
                # If zero is in the upper half plane, add the n-gon path to gamma_0+
                if argument(zero) >= 0 && argument(zero) <= pi
                    push!(gamma0Plus, nGonPath)
                else # If zero is in the lower half plane, add the n-gon path to gamma_0-
                    push!(gamma0Minus, nGonPath)
                end
            end
        else # If zero is at the origin, we deform all sectors and draw an n-gon around the origin
            # deform each sector in gamma_a+
            for i = 1:length(gammaAPlus)
                deformedPath = gammaAPlus[i]
                # find the index of the zero at origin in the sector boundary path
                index = find(j -> is_approx(deformedPath[j], 0+0*im), 1:length(deformedPath))
                # If the origin is not in the path, then it has already been bypassed
                if isempty(index)
                else # If not, find its index
                    index = index[1]
                end
                # create a path around zero (origin); the origin will not be the first or the last point in any sector boundary because it was initialized to be in the middle, and only insertions are performed. Moreover, the boundary path has already been sorted into the order in which they will be integrated over, so squarePath defined below has deformedPath[index-1], deformedPath[index+1] in the correct order.
                squarePath = [epsilon*e^(im*argument(deformedPath[index-1])), epsilon*e^(im*argument(deformedPath[index+1]))]
                # replace the zero with the deformed path
                deleteat!(deformedPath, index) # delete the origin
                splice!(deformedPath, index:(index-1), squarePath) # insert squarePath into where the origin was at
                deformedPath = convert(Array{Complex{Float64}}, deformedPath)
                gammaAPlus[i] = deformedPath
            end
            # deform each sector in gamma_a-
            for i = 1:length(gammaAMinus)
                deformedPath = gammaAMinus[i]
                index = find(j -> is_approx(deformedPath[j], 0+0*im), 1:length(deformedPath))
                if isempty(index)
                else
                    index = index[1]
                end
                squarePath = [epsilon*e^(im*argument(deformedPath[index-1])), epsilon*e^(im*argument(deformedPath[index+1]))]
                deleteat!(deformedPath, index)
                splice!(deformedPath, index:(index-1), squarePath)
                deformedPath = convert(Array{Complex{Float64}}, deformedPath)
                gammaAMinus[i] = deformedPath
            end
            # Draw an n-gon around the origin and add to gamma_0+
            vertices = get_nGonAroundZero(zero, epsilon/2, nGon)
            nGonPath = vcat(vertices, vertices[1])
            nGonPath = convert(Array{Complex{Float64}}, nGonPath)
            push!(gamma0Plus, nGonPath)
        end
    end
    return (gammaAPlus, gammaAMinus, gamma0Plus, gamma0Minus)
end
Out[157]:
get_gamma (generic function with 1 method)

Parameters

  • a: Number
    • $a$ in $\Gamma_a$, given along with $S$, $f$, and $B$ as parameters of get_input().
  • n: Int
    • $n$ in the definition of $\Gamma_a^{\pm}$.
  • zeroList: Array of Number
    • List of zeroes of $\Delta(\lambda)$. Found by human input with the aid of plot_levelCurves().
  • infty*: Number
    • Range of search when finding points in $\Gamma$. Default to the global variables INFTY.
  • nGon*: Int
    • $n$ in $n$-gon.

Returns

  • get_gamma: Tuple{Array, Array, Array, Array}
    • Returns the contours $\Gamma_a^+$, $\Gamma_a^-$, $\Gamma_0^+$, and $\Gamma_0^-$ as arrays of numbers in the complex plane. Note that each of these contour is an array of arrays, reflecting the fact that it is a union of individual paths.

Example

In [158]:
n = 2
a = 1
zeroList = [3+3*sqrt(3)*im, 2+2*sqrt(3)*im, 0+0*im, 0+5*im, 0-5*im]
(gammaAPlus, gammaAMinus, gamma0Plus, gamma0Minus) = get_gamma(a, n, zeroList)

println("gammaAPlus = $gammaAPlus")
println("gammaAMinus = $gammaAMinus")
println("gamma0Plus = $gamma0Plus")
println("gamma0Minus = $gamma0Minus")
gammaAPlus = Any[Complex{Float64}[7.07107+7.07107im, 0.14641+0.14641im, 0.207055+0.0im, 10.0+0.0im], Complex{Float64}[-10.0+1.22465e-15im, -0.207055+2.5357e-17im, -0.14641+0.14641im, -7.07107+7.07107im]]
gammaAMinus = Any[Complex{Float64}[10.0+0.0im, 0.207055+0.0im, 0.14641-0.14641im, 7.07107-7.07107im], Complex{Float64}[-7.07107-7.07107im, -0.14641-0.14641im, -0.207055+2.5357e-17im, -10.0+1.22465e-15im]]
gamma0Plus = Any[Complex{Float64}[2.89647+5.01684im, 2.8+5.14256im, 2.82068+5.29968im, 2.94641+5.39615im, 3.10353+5.37547im, 3.2+5.24974im, 3.17932+5.09262im, 3.05359+4.99615im, 2.89647+5.01684im], Complex{Float64}[-3.80354e-17+4.79294im, -0.14641+4.85359im, -0.207055+5.0im, -0.14641+5.14641im, 1.26785e-17+5.20706im, 0.14641+5.14641im, 0.207055+5.0im, 0.14641+4.85359im, -3.80354e-17+4.79294im], Complex{Float64}[1.89647+3.28479im, 1.8+3.41051im, 1.82068+3.56763im, 1.94641+3.6641im, 2.10353+3.64342im, 2.2+3.51769im, 2.17932+3.36057im, 2.05359+3.2641im, 1.89647+3.28479im], Complex{Float64}[-0.103528+1.26785e-17im, -0.0732051+0.0732051im, 6.33924e-18+0.103528im, 0.0732051+0.0732051im, 0.103528+0.0im, 0.0732051-0.0732051im, 6.33924e-18-0.103528im, -0.0732051-0.0732051im, -0.103528+1.26785e-17im]]
gamma0Minus = Any[Complex{Float64}[6.33924e-17-4.79294im, 0.14641-4.85359im, 0.207055-5.0im, 0.14641-5.14641im, -3.80354e-17-5.20706im, -0.14641-5.14641im, -0.207055-5.0im, -0.14641-4.85359im, 6.33924e-17-4.79294im]]

plot_contour(gamma; infty)

Visualize the contours $\Gamma_a^+$, $\Gamma_a^-$, $\Gamma_0^+$, $\Gamma_0^-$.

In [159]:
function plot_contour(gamma::Array; infty = INFTY)
    sectorPathList = Array{Any}(length(gamma),1)
    for i = 1:length(gamma)
        # For each sector path in the gamma contour, plot the points in the path and connect them in the order in which they appear in the path
        sectorPath = gamma[i]
        # labels = map(string, collect(1:1:length(sectorPath)))
        sectorPathList[i] = layer(x = real(sectorPath), y = imag(sectorPath), Geom.line(preserve_order=true))
    end
    coord = Coord.cartesian(xmin=-infty, xmax=infty, ymin=-infty, ymax=infty, fixed=true)
    Gadfly.plot(Guide.xlabel("Re"), Guide.ylabel("Im"), coord, sectorPathList...)
end
Out[159]:
plot_contour (generic function with 1 method)

Parameters

  • gamma: Array
    • Contour obtained from get_gamma().
  • infty*: Number
    • Range of search when finding points in $\Gamma$. Default to the global variable INFTY.

Returns

  • plot_contour: None
    • Plots the contour $\Gamma$ in the complex plane.

Example

In [160]:
n = 3
a = im
zeroList = [3+3*sqrt(3)*im, 2+2*sqrt(3)*im, 0+0*im, 0+5*im, 0-5*im, 4]
(gammaAPlus, gammaAMinus, gamma0Plus, gamma0Minus) = get_gamma(a, n, zeroList)
gamma = collect(Iterators.flatten([gammaAPlus, gammaAMinus, gamma0Plus, gamma0Minus]))

plot_contour(gamma)
Out[160]:
Re -35 -30 -25 -20 -15 -10 -5 0 5 10 15 20 25 30 35 -30 -29 -28 -27 -26 -25 -24 -23 -22 -21 -20 -19 -18 -17 -16 -15 -14 -13 -12 -11 -10 -9 -8 -7 -6 -5 -4 -3 -2 -1 0 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 -40 -20 0 20 40 -30 -28 -26 -24 -22 -20 -18 -16 -14 -12 -10 -8 -6 -4 -2 0 2 4 6 8 10 12 14 16 18 20 22 24 26 28 30 h,j,k,l,arrows,drag to pan i,o,+,-,scroll,shift-drag to zoom r,dbl-click to reset c for coordinates ? for help ? -35 -30 -25 -20 -15 -10 -5 0 5 10 15 20 25 30 35 -30 -29 -28 -27 -26 -25 -24 -23 -22 -21 -20 -19 -18 -17 -16 -15 -14 -13 -12 -11 -10 -9 -8 -7 -6 -5 -4 -3 -2 -1 0 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 -40 -20 0 20 40 -30 -28 -26 -24 -22 -20 -18 -16 -14 -12 -10 -8 -6 -4 -2 0 2 4 6 8 10 12 14 16 18 20 22 24 26 28 30 Im
In [161]:
n = 2
a = 1
(gammaAPlus, gammaAMinus, gamma0Plus, gamma0Minus) = get_gamma(a, n, zeroList)
gamma = collect(Iterators.flatten([gammaAPlus, gammaAMinus, gamma0Plus, gamma0Minus]))

plot_contour(gamma)
Out[161]:
Re -35 -30 -25 -20 -15 -10 -5 0 5 10 15 20 25 30 35 -30 -29 -28 -27 -26 -25 -24 -23 -22 -21 -20 -19 -18 -17 -16 -15 -14 -13 -12 -11 -10 -9 -8 -7 -6 -5 -4 -3 -2 -1 0 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 -40 -20 0 20 40 -30 -28 -26 -24 -22 -20 -18 -16 -14 -12 -10 -8 -6 -4 -2 0 2 4 6 8 10 12 14 16 18 20 22 24 26 28 30 h,j,k,l,arrows,drag to pan i,o,+,-,scroll,shift-drag to zoom r,dbl-click to reset c for coordinates ? for help ? -35 -30 -25 -20 -15 -10 -5 0 5 10 15 20 25 30 35 -30 -29 -28 -27 -26 -25 -24 -23 -22 -21 -20 -19 -18 -17 -16 -15 -14 -13 -12 -11 -10 -9 -8 -7 -6 -5 -4 -3 -2 -1 0 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 -40 -20 0 20 40 -30 -28 -26 -24 -22 -20 -18 -16 -14 -12 -10 -8 -6 -4 -2 0 2 4 6 8 10 12 14 16 18 20 22 24 26 28 30 Im
In [162]:
n = 4
a = 1
(gammaAPlus, gammaAMinus, gamma0Plus, gamma0Minus) = get_gamma(a, n, zeroList)
gamma = collect(Iterators.flatten([gammaAPlus, gammaAMinus, gamma0Plus, gamma0Minus]))

plot_contour(gamma)
Out[162]:
Re -35 -30 -25 -20 -15 -10 -5 0 5 10 15 20 25 30 35 -30 -29 -28 -27 -26 -25 -24 -23 -22 -21 -20 -19 -18 -17 -16 -15 -14 -13 -12 -11 -10 -9 -8 -7 -6 -5 -4 -3 -2 -1 0 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 -40 -20 0 20 40 -30 -28 -26 -24 -22 -20 -18 -16 -14 -12 -10 -8 -6 -4 -2 0 2 4 6 8 10 12 14 16 18 20 22 24 26 28 30 h,j,k,l,arrows,drag to pan i,o,+,-,scroll,shift-drag to zoom r,dbl-click to reset c for coordinates ? for help ? -35 -30 -25 -20 -15 -10 -5 0 5 10 15 20 25 30 35 -30 -29 -28 -27 -26 -25 -24 -23 -22 -21 -20 -19 -18 -17 -16 -15 -14 -13 -12 -11 -10 -9 -8 -7 -6 -5 -4 -3 -2 -1 0 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 -40 -20 0 20 40 -30 -28 -26 -24 -22 -20 -18 -16 -14 -12 -10 -8 -6 -4 -2 0 2 4 6 8 10 12 14 16 18 20 22 24 26 28 30 Im

solve_IBVP(L, U, a, zeroList, f; FPlusFunc, FMinusFunc, pDerivMatrix, infty)

Computes the solution \begin{align*} q(x,t) &= f_x\left(e^{-a\lambda^n t}F_\lambda(f)\right)\\ &= \int_{\Gamma_0^+}e^{i\lambda x}e^{-a\lambda^n t}F_\lambda^+(f)\,d\lambda + \int_{\Gamma_a^+}e^{i\lambda x}e^{-a\lambda^n t}F_\lambda^+(f)\,d\lambda + \int_{\Gamma_0^-}e^{i\lambda x}e^{-a\lambda^n t}F_\lambda^-(f)\,d\lambda + \int_{\Gamma_a^-}e^{i\lambda x}e^{-a\lambda^n t}F_\lambda^-(f)\,d\lambda\\ &= \int_{\Gamma_0^+} + \int_{\Gamma_a^+} e^{ix\lambda - at\lambda^n}F_\lambda^+(f)\,d\lambda + \int_{\Gamma_0^-} + \int_{\Gamma_a^-} e^{ix\lambda - at\lambda^n}F_\lambda^-(f)\,d\lambda. \end{align*}

In [163]:
function solve_IBVP(L::LinearDifferentialOperator, U::VectorBoundaryForm, a::Number, zeroList::Array, f::Function; FPlusFunc = lambda->get_FPlusMinus(adjointU; symbolic = false)[1](lambda, f), FMinusFunc = lambda->get_FPlusMinus(adjointU; symbolic = false)[2](lambda, f), pDerivMatrix = get_pDerivMatrix(L), infty = INFTY)
    n = length(L.pFunctions)-1
    adjointU = get_adjointU(L, U, pDerivMatrix)
    (gammaAPlus, gammaAMinus, gamma0Plus, gamma0Minus) = get_gamma(a, n, zeroList)
    function q(x,t)
        integrandPlus(lambda) = e^(im*lambda*x)*e^(-a*lambda^n*t) * FPlusFunc(lambda)
        integrandMinus(lambda) = e^(im*lambda*x)*e^(-a*lambda^n*t) * FMinusFunc(lambda)
        tic()
        println("integrandPlus = $(integrandPlus(1+im))")
        println("integrandMinus = $(integrandMinus(1+im))")
        toc()
        # Integrate over individual paths in the Gamma contours
        println("gamma0Plus = $gamma0Plus")
        tic()
        integralGamma0Plus = 0
        for path in gamma0Plus
            println("path = $path")
            if length(path) == 0
                path = [im,im]
            end
            tic()
            integralGamma0Plus += quadgk(integrandPlus, path...)[1]
            toc()
        end
        toc()
        println("int_0_+ = $integralGamma0Plus")
        
        println("gammaAPlus = $gammaAPlus")
        tic()
        integralGammaAPlus = 0
        for path in gammaAPlus
            println("path = $path")
            if length(path) == 0
                path = [im,im]
            end
            tic()
            integralGammaAPlus += quadgk(integrandPlus, path...)[1]
            toc()
        end
        toc()
        println("int_a_+ = $integralGammaAPlus")
        
        println("gamma0Minus = $gamma0Minus")
        tic()
        integralGamma0Minus = 0
        for path in gamma0Minus
            println("path = $path")
            if length(path) == 0
                path = [-im,-im]
            end
            tic()
            integralGamma0Minus += quadgk(integrandMinus, path...)[1]
            toc()
        end
        toc()
        println("int_0_- = $integralGamma0Minus")
        
        println("gammaAMinus = $gammaAMinus")
        tic()
        integralGammaAMinus = 0
        for path in gammaAMinus
            println("path = $path")
            if length(path) == 0
                path = [-im,-im]
            end
            tic()
            integralGammaAMinus += quadgk(integrandMinus, path...)[1]
            toc()
        end
        toc()
        println("int_a_- = $integralGammaAMinus")
        return (integralGamma0Plus + integralGammaAPlus + integralGamma0Minus + integralGammaAMinus)
    end
    return q
end
Out[163]:
solve_IBVP (generic function with 1 method)

Parameters

  • L: LinearDifferentialOperator
    • Linear differential operator in the differential equation of the IBVP.
  • U: VectorBoundaryForm
    • Vector boundary form encoding the boundary conditions of the IBVP.
  • a: Number
    • Coefficient of L in the differential equation.
  • zeroList: Array
    • List of (approximate) zeroes of $\Delta(\lambda)$.
  • f: Function
    • Initial condition of the IBVP. It also satisfies the boundary conditions.
  • FPlusFunc, FMinusFunc: Function
    • $F^+$, $F^-$. Output of get_FPlusMinus(). Default to lambda-> get_FPlusMinusLambda2(adjointU; symbolic = false)[1](lambda, f). For better performance, the user may usee the symbolic expressions of $F^+$, $F^-$ to directly define FPlusFunc, FMinusFunc as functions.
  • pDerivMatrix*: Array
    • Matrix whose $(i+1)(j+1)$-entry is the $j$th derivative of $p_i$ (L.pFunctions[i]) implemented as a Function, Number, or SymPy.Sym. Default to the output of get_pDerivMatrix(L).
  • infty*: Number
    • Range of search when finding points in $\Gamma$. Default to the global variable INFTY.

Returns

  • solve_IBVP: Function
    • Returns a function q(x,t) that solves the IBVP.

Example

Recall that the IBVP is posed as follows.

Define $n$ linearly independent boundary forms $\{B_j: C\to\mathbb{C}\mid j\in\{1,2,\ldots,n\}\}$ \begin{align*} B_j\phi &= \sum_{k=0}^{n-1} \left(b_{jk}\phi^{(k)}(0) + \beta_{jk}\phi^{(k)}(1)\right),\quad j\in \{1,2,\ldots, n\}. \end{align*} Define \begin{align*} \Phi &= \{\phi\in C: B_j\phi = 0\,\forall j \in \{1,2,\ldots, n\}\}. \end{align*} Let $S:\Phi\to C$ be the linear differential operator $$S\phi(x) = (-i)^n \phi^{(n)}(x).$$

Let $a\in\mathbb{C}$ be a constant.

Consider the IBVP \begin{alignat*}{2} (\partial_t + aS)q(x,t) &= 0,\quad&(x,t)\in (0,1)\times (0,T)\\ q(x,0) = f(x)&\in\Phi,\quad &x\in [0,1]\\ q(\cdot, t) &\in\Phi,\quad &t\in [0,T], \end{alignat*}

Case 1.1

Suppose $n=2$. Then $$S\phi(x)= (-i)^2 \phi^{(2)}(x) = -\phi^{(2)}.$$ Suppose $a=e^{i\theta}$ for $\theta\in [-\frac{\pi}{2}, \frac{\pi}{2}]$.

For $\beta_0, \beta_1\in\hat{\mathbb{C}}$ ($\mathbb{C}$ including $0$ and $\infty$), consider the following boundary conditions $\Phi$: \begin{align*} \varphi(0) + \beta_0\varphi(1) &= 0\\ \varphi'(0) + \beta_1\varphi'(1) &= 0. \end{align*}

We note that in complete form,

  • $S$ is given by $$S\phi = p_0 \phi^{(2)} + p_1 \phi^{(1)} + p_2 \phi^{(0)}$$ where $p_0=-1$, $p_1=p_2=0$.
  • $\Phi$ is given by \begin{align*} 1\cdot \varphi(0) + \beta_0\cdot \varphi(1) + 0\cdot \varphi^{(1)}(0) + 0\cdot \varphi^{(1)}(1) &= 0\\ 0\cdot \varphi(0) + 0\cdot \varphi(1) + 1\cdot \varphi^{(1)}(0) + \beta_1\cdot \varphi^{(1)}(1) &= 0. \end{align*} Thus, $$b = \begin{bmatrix}1&0\\0&1\end{bmatrix},\quad \beta = \begin{bmatrix}\beta_0&0\\0&\beta_1\end{bmatrix}.$$

Thus, $f(x)\in\Phi$ needs to satisfy \begin{align*} Uf = \begin{bmatrix} 1&0&\beta_0&0\\ 0&1&0&\beta_1 \end{bmatrix} \begin{bmatrix}f(0)\\f'(0)\\f(1)\\f'(1)\end{bmatrix} = 0. \end{align*}

In [164]:
n = 2
beta0 = -1
beta1 = -1
theta = 0
a = e^(im*theta)

t = symbols("t")
symPFunctions = [-1 0 0]
interval = (0,1)
symL = SymLinearDifferentialOperator(symPFunctions, interval, t)
L = get_L(symL)
b = [1 0; 0 1]
beta = [beta0 0; 0 beta1]
U = VectorBoundaryForm(b, beta)
f(x) = sin(x*2*pi)
x = symbols("x")
fSym = sin(x*2*PI)
check_boundaryConditions(L, U, fSym)
Out[164]:
true
In [165]:
adjointU = get_adjointU(L, U)
delta = get_delta(adjointU; symbolic = true)
lambda = free_symbols(delta)[1]
x = symbols("x", real = true)
y = symbols("y", real = true)
bivariateDelta = subs(delta, lambda, x+im*y)
plot_levelCurves(bivariateDelta; width = 2500, height = 2000)
Out[165]:
-10.0 -9.6 -9.2 -8.8 -8.4 -8.0 -7.6 -7.2 -6.8 -6.4 -6.0 -5.6 -5.2 -4.8 -4.4 -4.0 -3.6 -3.2 -2.8 -2.4 -2.0 -1.6 -1.2 -0.8 -0.4 0.0 0.4 0.8 1.2 1.6 2.0 2.4 2.8 3.2 3.6 4.0 4.4 4.8 5.2 5.6 6.0 6.4 6.8 7.2 7.6 8.0 8.4 8.8 9.2 9.6 10.0 -10.0 -9.6 -9.2 -8.8 -8.4 -8.0 -7.6 -7.2 -6.8 -6.4 -6.0 -5.6 -5.2 -4.8 -4.4 -4.0 -3.6 -3.2 -2.8 -2.4 -2.0 -1.6 -1.2 -0.8 -0.4 0.0 0.4 0.8 1.2 1.6 2.0 2.4 2.8 3.2 3.6 4.0 4.4 4.8 5.2 5.6 6.0 6.4 6.8 7.2 7.6 8.0 8.4 8.8 9.2 9.6 10.0
In [166]:
zeroList = [0, 2*pi, -2*pi]
(gammaAPlus, gammaAMinus, gamma0Plus, gamma0Minus) = get_gamma(a, n, zeroList)
gamma = collect(Iterators.flatten([gammaAPlus, gammaAMinus, gamma0Plus, gamma0Minus]))
plot_contour(gamma)
Out[166]:
Re -35 -30 -25 -20 -15 -10 -5 0 5 10 15 20 25 30 35 -30 -29 -28 -27 -26 -25 -24 -23 -22 -21 -20 -19 -18 -17 -16 -15 -14 -13 -12 -11 -10 -9 -8 -7 -6 -5 -4 -3 -2 -1 0 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 -40 -20 0 20 40 -30 -28 -26 -24 -22 -20 -18 -16 -14 -12 -10 -8 -6 -4 -2 0 2 4 6 8 10 12 14 16 18 20 22 24 26 28 30 h,j,k,l,arrows,drag to pan i,o,+,-,scroll,shift-drag to zoom r,dbl-click to reset c for coordinates ? for help ? -35 -30 -25 -20 -15 -10 -5 0 5 10 15 20 25 30 35 -30 -29 -28 -27 -26 -25 -24 -23 -22 -21 -20 -19 -18 -17 -16 -15 -14 -13 -12 -11 -10 -9 -8 -7 -6 -5 -4 -3 -2 -1 0 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 -40 -20 0 20 40 -30 -28 -26 -24 -22 -20 -18 -16 -14 -12 -10 -8 -6 -4 -2 0 2 4 6 8 10 12 14 16 18 20 22 24 26 28 30 Im
In [167]:
(FPlusSym, FMinusSym) = get_FPlusMinus(adjointU; symbolic = true)
FPlusSymF = prettyPrint(simplify(FPlusSym(f)))
# FPlusSymF = simplify(FPlusSym(f))
Out[167]:
$$\frac{2 \left(- e^{i \lambda} + 1\right) \left(0.785 \lambda^{8} e^{i \lambda} - 0.785 \lambda^{8} - 0.014 i \lambda^{7} e^{i \lambda} - 0.014 i \lambda^{7} + 31.64 \lambda^{6} e^{i \lambda} - 31.64 \lambda^{6} + 19.892 i \lambda^{5} e^{i \lambda} + 19.892 i \lambda^{5} + 773.28 \lambda^{4} e^{i \lambda} - 773.28 \lambda^{4} - 7508.255 i \lambda^{3} e^{i \lambda} - 7508.255 i \lambda^{3} + 138882.961 \lambda^{2} e^{i \lambda} - 138882.961 \lambda^{2} + 743198.707 i \lambda e^{i \lambda} + 743198.707 i \lambda - 1486397.414 e^{i \lambda} + 1486397.414\right) e^{- i \lambda}}{\pi \lambda^{10} \left(\cos{\left (\lambda \right )} - 1\right)}$$
In [168]:
function FPlusSymFunc(lambda)
    result = (2*(-e^(im*lambda)+1) * (0.785*lambda^8*e^(im*lambda) - 0.785*lambda^8 - 0.014*im*lambda^7*e^(im*lambda) - 0.014*im*lambda^7 + 31.64*lambda^6*e^(im*lambda) - 31.64*lambda^6 + 19.892*im*lambda^5*e^(im*lambda) + 19.892*im*lambda^5 + 773.28*lambda^4*e^(im*lambda) - 773.28*lambda^4 - 7508.255*im*lambda^3*e^(im*lambda) - 7508.255*im*lambda^3 + 138882.961*lambda^2*e^(im*lambda) - 138882.961*lambda^2 + 743198.707*im*lambda*e^(im*lambda) + 743198.707*im*lambda - 1486397.414*e^(im*lambda) + 1486397.414)*e^(-im*lambda))/(pi*lambda^10*(cos(lambda)-1))
    return result
end
Out[168]:
FPlusSymFunc (generic function with 1 method)
In [169]:
FMinusSymF = prettyPrint(FMinusSym(f))
Out[169]:
$$\frac{2 \left(- e^{i \lambda} + 1\right) \left(- 0.785 \lambda^{8} e^{i \lambda} + 0.785 \lambda^{8} + 0.014 i \lambda^{7} e^{i \lambda} + 0.014 i \lambda^{7} - 31.64 \lambda^{6} e^{i \lambda} + 31.64 \lambda^{6} - 19.892 i \lambda^{5} e^{i \lambda} - 19.892 i \lambda^{5} - 773.28 \lambda^{4} e^{i \lambda} + 773.28 \lambda^{4} + 7508.255 i \lambda^{3} e^{i \lambda} + 7508.255 i \lambda^{3} - 138882.961 \lambda^{2} e^{i \lambda} + 138882.961 \lambda^{2} - 743198.707 i \lambda e^{i \lambda} - 743198.707 i \lambda + 1486397.414 e^{i \lambda} - 1486397.414\right) e^{- 2 i \lambda}}{\pi \lambda^{10} \left(- \cos{\left (\lambda \right )} + 1\right)}$$
In [170]:
function FMinusSymFunc(lambda)
    result = (2*(-e^(im*lambda)+1) * (-0.785*lambda^8*e^(im*lambda) + 0.785*lambda^8 + 0.014*im*lambda^7*e^(im*lambda) + 0.014*im*lambda^7 - 31.64*lambda^6*e^(im*lambda) + 31.64*lambda^6 - 19.892*im*lambda^5*e^(im*lambda) - 19.892*im*lambda^5 - 773.28*lambda^4*e^(im*lambda) + 773.28*lambda^4 + 7508.255*im*lambda^3*e^(im*lambda) + 7508.255*im*lambda^3 - 138882.961*lambda^2*e^(im*lambda) + 138882.961*lambda^2 - 743198.707*im*lambda*e^(im*lambda) - 743198.707*im*lambda + 1486397.414*e^(im*lambda) - 1486397.414) * e^(-2*im*lambda))/(pi*lambda^10*(-cos(lambda)+1))
    return result
end
Out[170]:
FMinusSymFunc (generic function with 1 method)
In [171]:
q = solve_IBVP(L, U, a, zeroList, f; FPlusFunc = FPlusSymFunc, FMinusFunc = FMinusSymFunc)
Out[171]:
q (generic function with 1 method)
In [172]:
tic()
q(1/2, 1/2)
toc()
# quadgk() is slow around zeroes of Delta (poles)
integrandPlus = 0.013769402222841216 - 0.006604001599243898im
integrandMinus = 0.005117339626383156 - 0.04119477210371228im
elapsed time: 0.000534104 seconds
gamma0Plus = Any[Complex{Float64}[-0.444288+5.44096e-17im, -0.314159+0.314159im, 2.72048e-17+0.444288im, 0.314159+0.314159im, 0.444288+0.0im, 0.314159-0.314159im, 2.72048e-17-0.444288im, -0.314159-0.314159im, -0.444288+5.44096e-17im]]
path = Complex{Float64}[-0.444288+5.44096e-17im, -0.314159+0.314159im, 2.72048e-17+0.444288im, 0.314159+0.314159im, 0.444288+0.0im, 0.314159-0.314159im, 2.72048e-17-0.444288im, -0.314159-0.314159im, -0.444288+5.44096e-17im]
elapsed time: 8.12141941 seconds
elapsed time: 8.169769935 seconds
int_0_+ = 0.0003760094002791773 + 7.3273030732412025e-9im
gammaAPlus = Any[Complex{Float64}[7.07107+7.07107im, 0.628319+0.628319im, 0.888577+1.79242e-17im, 5.39461+1.08819e-16im, 5.65487-0.628319im, 6.28319-0.888577im, 6.9115-0.628319im, 7.17176+0.0im, 10.0+0.0im], Complex{Float64}[-10.0+1.22465e-15im, -7.17176+1.08819e-16im, -6.9115-0.628319im, -6.28319-0.888577im, -5.65487-0.628319im, -5.39461-2.17638e-16im, -0.888577+1.08819e-16im, -0.628319+0.628319im, -7.07107+7.07107im]]
path = Complex{Float64}[7.07107+7.07107im, 0.628319+0.628319im, 0.888577+1.79242e-17im, 5.39461+1.08819e-16im, 5.65487-0.628319im, 6.28319-0.888577im, 6.9115-0.628319im, 7.17176+0.0im, 10.0+0.0im]
elapsed time: 9.191801328 seconds
path = Complex{Float64}[-10.0+1.22465e-15im, -7.17176+1.08819e-16im, -6.9115-0.628319im, -6.28319-0.888577im, -5.65487-0.628319im, -5.39461-2.17638e-16im, -0.888577+1.08819e-16im, -0.628319+0.628319im, -7.07107+7.07107im]
elapsed time: 7.406919188 seconds
elapsed time: 16.601084657 seconds
int_a_+ = -2.383574129850368e-5 - 2.0859876394036143e-11im
gamma0Minus = Any[]
elapsed time: 4.626e-6 seconds
int_0_- = 0
gammaAMinus = Any[Complex{Float64}[10.0+0.0im, 7.17176+0.0im, 6.9115-0.628319im, 6.28319-0.888577im, 5.65487-0.628319im, 5.39461+1.08819e-16im, 0.888577+1.79242e-17im, 0.628319-0.628319im, 7.07107-7.07107im], Complex{Float64}[-7.07107-7.07107im, -0.628319-0.628319im, -0.888577+1.08819e-16im, -5.39461-2.17638e-16im, -5.65487-0.628319im, -6.28319-0.888577im, -6.9115-0.628319im, -7.17176+1.08819e-16im, -10.0+1.22465e-15im]]
path = Complex{Float64}[10.0+0.0im, 7.17176+0.0im, 6.9115-0.628319im, 6.28319-0.888577im, 5.65487-0.628319im, 5.39461+1.08819e-16im, 0.888577+1.79242e-17im, 0.628319-0.628319im, 7.07107-7.07107im]
elapsed time: 7.680568443 seconds
path = Complex{Float64}[-7.07107-7.07107im, -0.628319-0.628319im, -0.888577+1.08819e-16im, -5.39461-2.17638e-16im, -5.65487-0.628319im, -6.28319-0.888577im, -6.9115-0.628319im, -7.17176+1.08819e-16im, -10.0+1.22465e-15im]
elapsed time: 7.145228922 seconds
elapsed time: 14.828212397 seconds
int_a_- = 2.383571113051626e-5 + 1.268790816497372e-11im
elapsed time: 40.36184474 seconds
Out[172]:
40.36184474
In [173]:
t = 0.1
# Gadfly.plot(x -> real(q(x,t)), 0, 1)
# Slow if FPlusSymFunc, FMinusSymFunc contain many high powers of lambda (long compilation time of integrandPlus, integrandMinus at each x)
# https://github.com/JuliaLang/julia/issues/19158
Out[173]:
0.1

Case 1.2

Now, for $b_0, b_1\in\hat{\mathbb{C}}$, consider the following boundary conditions $\Phi$: \begin{align*} \varphi(0) + b_0\varphi'(0) &= 0\\ \varphi(1) + b_1\varphi'(1) &= 0. \end{align*} We note that in complete form,

  • $\Phi$ is given by \begin{align*} 1\cdot \varphi(0) + 0\cdot \varphi(1) + b_0\cdot \varphi^{(1)}(0) + 0\cdot \varphi^{(1)}(1) &= 0\\ 0\cdot \varphi(0) + 1\cdot \varphi(1) + 0\cdot \varphi^{(1)}(0) + b_1\cdot \varphi^{(1)}(1) &= 0. \end{align*} Thus, $$b = \begin{bmatrix}1&b_0\\ 0&0\end{bmatrix},\quad \beta = \begin{bmatrix}0&0\\ 1&b_1\end{bmatrix}.$$ Thus, $f(x)\in\Phi$ needs to satisfy \begin{align*} Uf = \begin{bmatrix} 1&b_0&0&1\\ 0&0&1&b_1 \end{bmatrix} \begin{bmatrix}f(0)\\f'(0)\\f(1)\\f'(1)\end{bmatrix} = 0. \end{align*}

Case 2.1

Suppose $n=3$. Then $$S\phi(x) = (-i)^3 \phi^{(3)}(x) = i\phi^{(3)}.$$ Suppose $a=\pm i$.

For $\beta_0, \beta_1, \beta_2\in\hat{\mathbb{C}}$ ($\mathbb{C}$ including $0$ and $\infty$), consider the following boundary conditions $\Phi$: \begin{align*} \phi(0) + \beta_0\phi(1) &= 0\\ \phi^{(1)}(0) + \beta_1\phi^{(1)}(1) &= 0\\ \phi^{(2)}(0) + \beta_2\phi^{(2)}(1) &= 0. \end{align*}

We note that in complete form,

  • $S$ is given by $$S\phi = p_0 \phi^{(3)} + p_1 \phi^{(2)} + p_2 \phi^{(1)} + p_3\phi$$ where $p_0=i$, $p_1=p_2=p_3=0$.
  • $\Phi$ is given by \begin{align*} 1\cdot \phi(0) + \beta_0\cdot \phi(1) + 0\cdot \phi^{(1)}(0) + 0\cdot\phi^{(1)}(1) + 0\cdot \phi^{(2)}(0) + 0\cdot\phi^{(2)}(1) &= 0\\ 0\cdot \phi(0) + 0\cdot \phi(1) + 1\cdot \phi^{(1)}(0) + \beta_1\cdot \phi^{(1)}(1) + 0\cdot \phi^{(2)}(0) + 0\cdot\phi^{(2)}(1) &= 0\\ 0\cdot \phi(0) + 0\cdot \phi(1) + 0\cdot \phi^{(1)}(0) + 0\cdot \phi^{(1)}(1) + 1\cdot \phi^{(2)}(0) + \beta_2\cdot \phi^{(2)}(1) &= 0. \end{align*} Thus, $$b = \begin{bmatrix}1&0&0\\0&1&0\\ 0&0&1\end{bmatrix},\quad \beta = \begin{bmatrix}\beta_0&0&0\\0&\beta_1&0\\ 0&0&\beta_2\end{bmatrix}.$$ Thus, $f(x)\in\Phi$ needs to satisfy \begin{align*} Uf = \begin{bmatrix} 1&0&0&\beta_0&0&0\\ 0&1&0&0&\beta_1&0\\ 0&0&1&0&0&\beta_2 \end{bmatrix} \begin{bmatrix}f(0)\\f'(0)\\f''(0)\\f(1)\\f'(1)\\f''(1)\end{bmatrix} = 0. \end{align*}

Case 2.2

Now, for $b_0\in\hat{\mathbb{C}}$, consider the following boundary conditions $\Phi$: \begin{align*} \varphi(0) &= 0\\ \varphi(1) &= 1\\ \varphi^{(1)}(0) + b_0\varphi^{(1)}(1) &= 0. \end{align*} We note that in complete form,

  • $\Phi$ is given by \begin{align*} 1\cdot \varphi(0) + 0\cdot \varphi(1) + 0\cdot \varphi^{(1)}(0) + 0\cdot \varphi^{(1)}(1) + 0\cdot \varphi^{(2)}(0) + 0\cdot \varphi^{(2)}(1)&= 0\\ 0\cdot \varphi(0) + 1\cdot \varphi(1) + 0\cdot \varphi^{(1)}(0) + 0\cdot \varphi^{(1)}(1) + 0\cdot \varphi^{(2)}(0) + 0\cdot \varphi^{(2)}(1)&= 0\\ 0\cdot \varphi(0) + 0\cdot \varphi(1) + 1\cdot \varphi^{(1)}(0) + b_0\cdot \varphi^{(1)}(1) + 0\cdot \varphi^{(2)}(0) + 0\cdot \varphi^{(2)}(1)&= 0 \end{align*} Thus, $$b = \begin{bmatrix}1&0&0\\ 0&0&0\\ 0&1&0\end{bmatrix},\quad \beta = \begin{bmatrix}0&0&0\\ 1&0&0\\ 0&b_0&0\end{bmatrix}.$$ Thus, $f(x)\in\Phi$ needs to satisfy \begin{align*} Uf = \begin{bmatrix} 1&0&0& 0&0&0\\ 0&0&0& 1&0&0\\ 0&1&0& 0&b_0&0 \end{bmatrix} \begin{bmatrix}f(0)\\f'(0)\\f''(0)\\f(1)\\f'(1)\\f''(1)\end{bmatrix} = 0. \end{align*}

Verifying the formulas of $F_\lambda^+$, $F_\lambda^-$

Problem 1

\begin{alignat*}{3} q_t(x,t) + q_{xxx}(x,t) &= 0,\quad &(x,t)&\in (0,1)\times (0,T)\\ q(x,0) &= f(x),\quad &x&\in [0,1]\\ q(0,t) &= 0, \quad &t&\in [0,T]\\ q(1,t) &= 0\quad &t&\in [0,T]\\ q_x(1,t) &= \frac{1}{2}q_x(0,t)\quad &t&\in [0,T]. \end{alignat*}

\begin{align*} F_\lambda^+(f) &= \frac{1}{2\pi\Delta(\lambda)}\left[\text{FT}[f](\lambda)(e^{i\lambda} + 2\alpha e^{-i\alpha\lambda} + 2\alpha^2 e^{-i\alpha^2\lambda}) + \text{FT}[f](\alpha\lambda)(\alpha e^{i\alpha\lambda} - 2\alpha e^{-i\lambda}) \right.\\ &\qquad \left. + \text{FT}[f](\alpha^2\lambda)(\alpha^2e^{i\alpha\lambda} - 2\alpha^2e^{-i\lambda})\right]\\ F_\lambda^-(f) &= \frac{e^{-i\lambda}}{2\pi\Delta(\lambda)}\left[-\text{FT}[f](\lambda)(2+\alpha^2 e^{-\alpha\lambda} + \alpha e^{-\alpha^2\lambda}) - \alpha\text{FT}[f](\alpha\lambda)(2-e^{-i\alpha^2\lambda}) \right.\\ &\qquad \left. - \alpha^2\text{FT}[f](\alpha^2\lambda)(2-e^{-i\alpha\lambda})\right], \end{align*} where \begin{align*} \Delta(\lambda) = e^{i\lambda} + \alpha e^{i\alpha\lambda} + \alpha^2 e^{i\alpha^2\lambda} + 2(e^{-i\lambda} + \alpha e^{-i\alpha\lambda} + \alpha^2e^{-i\alpha^2\lambda}). \end{align*}

In [174]:
n = 3

t = symbols("t")
symPFunctions = [1 0 0 0]
interval = (0, 1)
symL = SymLinearDifferentialOperator(symPFunctions, interval, t)
L = get_L(symL)
M = [1 0 0; 0 0 0; 0 1 0]
N = [0 0 0; 1 0 0; 0 -2 0]
U = VectorBoundaryForm(M, N)
Out[174]:
VectorBoundaryForm([1 0 0; 0 0 0; 0 1 0], [0 0 0; 1 0 0; 0 -2 0])
In [175]:
c = symbols("c")
FT = SymFunction("FT[f]")(c)
FTc = symbols("FT[f](c)")
alpha = symbols("alpha")
lambda = symbols("lambda")
Out[175]:
$$\lambda$$
In [176]:
deltaFormula = e^(im*lambda) + alpha*e^(im*alpha*lambda) + (alpha)^2*e^(im*(alpha)^2*lambda) + 2*(e^(-im*lambda) + alpha*e^(-im*alpha*lambda) + (alpha)^2*e^(-im*(alpha)^2*lambda))
Out[176]:
$$\alpha^{2} e^{i \alpha^{2} \lambda} + 2 \alpha^{2} e^{- i \alpha^{2} \lambda} + \alpha e^{i \alpha \lambda} + 2 \alpha e^{- i \alpha \lambda} + e^{i \lambda} + 2 e^{- i \lambda}$$
In [177]:
FPlusFormula = 1/(2*PI*deltaFormula) * (FT(lambda)*(e^(im*lambda) + 2*alpha*e^(-im*alpha*lambda) + 2*alpha^2*e^(-im*alpha^2*lambda)) + FT(alpha*lambda)*(alpha*e^(im*alpha*lambda) - 2*alpha*e^(-im*lambda)) + FT(alpha^2*lambda)*(alpha^2*e^(im*alpha^2*lambda) - 2*alpha^2*e^(-im*lambda)))
Out[177]:
$$\frac{\left(\alpha e^{i \alpha \lambda} - 2 \alpha e^{- i \lambda}\right) \operatorname{FT[f]}{\left (\alpha \lambda \right )} + \left(\alpha^{2} e^{i \alpha^{2} \lambda} - 2 \alpha^{2} e^{- i \lambda}\right) \operatorname{FT[f]}{\left (\alpha^{2} \lambda \right )} + \left(2 \alpha^{2} e^{- i \alpha^{2} \lambda} + 2 \alpha e^{- i \alpha \lambda} + e^{i \lambda}\right) \operatorname{FT[f]}{\left (\lambda \right )}}{2 \pi \left(\alpha^{2} e^{i \alpha^{2} \lambda} + 2 \alpha^{2} e^{- i \alpha^{2} \lambda} + \alpha e^{i \alpha \lambda} + 2 \alpha e^{- i \alpha \lambda} + e^{i \lambda} + 2 e^{- i \lambda}\right)}$$
In [178]:
FMinusFormula = (e^(-im*lambda))/(2*PI*deltaFormula) * (-FT(lambda)*(2+alpha^2*e^(-im*alpha*lambda)+alpha*e^(-im*alpha^2*lambda)) - alpha*FT(alpha*lambda)*(2-e^(-im*alpha^2*lambda)) - alpha^2*FT(alpha^2*lambda)*(2-e^(-im*alpha*lambda)))
Out[178]:
$$\frac{\left(- \alpha^{2} \left(2 - e^{- i \alpha \lambda}\right) \operatorname{FT[f]}{\left (\alpha^{2} \lambda \right )} - \alpha \left(2 - e^{- i \alpha^{2} \lambda}\right) \operatorname{FT[f]}{\left (\alpha \lambda \right )} - \left(\alpha^{2} e^{- i \alpha \lambda} + \alpha e^{- i \alpha^{2} \lambda} + 2\right) \operatorname{FT[f]}{\left (\lambda \right )}\right) e^{- i \lambda}}{2 \pi \left(\alpha^{2} e^{i \alpha^{2} \lambda} + 2 \alpha^{2} e^{- i \alpha^{2} \lambda} + \alpha e^{i \alpha \lambda} + 2 \alpha e^{- i \alpha \lambda} + e^{i \lambda} + 2 e^{- i \lambda}\right)}$$
In [179]:
adjointU = get_adjointU(L, U)
(FPlusSymGeneric, FMinusSymGeneric) = get_FPlusMinus(adjointU; symbolic = true, generic = true)
prettyPrint(simplify(FPlusSymGeneric))
Out[179]:
$$\frac{0.25 \alpha \operatorname{FT[f]}{\left (\lambda \right )} e^{i \lambda} - 0.5 \alpha \operatorname{FT[f]}{\left (\lambda \right )} e^{i \lambda \left(\alpha^{2} + 1\right)} - 0.25 \alpha \operatorname{FT[f]}{\left (\alpha \lambda \right )} e^{i \alpha \lambda} + 0.5 \alpha \operatorname{FT[f]}{\left (\alpha \lambda \right )} e^{i \alpha \lambda \left(\alpha + 1\right)} + 0.5 \operatorname{FT[f]}{\left (\lambda \right )} e^{i \lambda \left(\alpha + 1\right)} - 0.5 \operatorname{FT[f]}{\left (\lambda \right )} e^{i \lambda \left(\alpha^{2} + 1\right)} - 0.25 \operatorname{FT[f]}{\left (\alpha \lambda \right )} e^{i \alpha \lambda} + 0.5 \operatorname{FT[f]}{\left (\alpha \lambda \right )} e^{i \alpha \lambda \left(\alpha + 1\right)} + 0.25 \operatorname{FT[f]}{\left (\alpha^{2} \lambda \right )} e^{i \alpha^{2} \lambda} - 0.5 \operatorname{FT[f]}{\left (\alpha^{2} \lambda \right )} e^{i \alpha \lambda \left(\alpha + 1\right)}}{\pi \left(0.5 \alpha e^{i \lambda} - 0.5 \alpha e^{i \alpha \lambda} - \alpha e^{i \lambda \left(\alpha^{2} + 1\right)} + \alpha e^{i \alpha \lambda \left(\alpha + 1\right)} - 0.5 e^{i \alpha \lambda} + 0.5 e^{i \alpha^{2} \lambda} + e^{i \lambda \left(\alpha + 1\right)} - e^{i \lambda \left(\alpha^{2} + 1\right)}\right)}$$
In [180]:
prettyPrint(simplify(FMinusSymGeneric))
Out[180]:
$$\frac{0.25 \alpha \operatorname{FT[f]}{\left (\lambda \right )} e^{i \alpha \lambda} - 0.5 \alpha \operatorname{FT[f]}{\left (\lambda \right )} e^{i \alpha \lambda \left(\alpha + 1\right)} - 0.25 \alpha \operatorname{FT[f]}{\left (\alpha \lambda \right )} e^{i \alpha \lambda} + 0.5 \alpha \operatorname{FT[f]}{\left (\alpha \lambda \right )} e^{i \alpha \lambda \left(\alpha + 1\right)} + 0.25 \operatorname{FT[f]}{\left (\lambda \right )} e^{i \alpha \lambda} - 0.25 \operatorname{FT[f]}{\left (\lambda \right )} e^{i \alpha^{2} \lambda} - 0.25 \operatorname{FT[f]}{\left (\alpha \lambda \right )} e^{i \alpha \lambda} + 0.5 \operatorname{FT[f]}{\left (\alpha \lambda \right )} e^{i \alpha \lambda \left(\alpha + 1\right)} + 0.25 \operatorname{FT[f]}{\left (\alpha^{2} \lambda \right )} e^{i \alpha^{2} \lambda} - 0.5 \operatorname{FT[f]}{\left (\alpha^{2} \lambda \right )} e^{i \alpha \lambda \left(\alpha + 1\right)}}{\pi \left(0.5 \alpha e^{i \lambda} - 0.5 \alpha e^{i \alpha \lambda} - \alpha e^{i \lambda \left(\alpha^{2} + 1\right)} + \alpha e^{i \alpha \lambda \left(\alpha + 1\right)} - 0.5 e^{i \alpha \lambda} + 0.5 e^{i \alpha^{2} \lambda} + e^{i \lambda \left(\alpha + 1\right)} - e^{i \lambda \left(\alpha^{2} + 1\right)}\right)}$$
In [181]:
function test_formula(formula1, formula2)
    results = [true]
    for i = 1:100
        println("i = $i")
        realLambda = rand(Uniform(-50.0,50.0), 1, 1)[1]
        imagLambda = rand(Uniform(-50.0,50.0), 1, 1)[1]
        lambdaVal = realLambda + im*imagLambda
        println("lambda = $lambdaVal")
        println("-----------------------------------------------------------------")
        
        println(FT(lambda))
        output1 = SymPy.N(subs(formula1, (FT(lambda), 1), (FT(alpha*lambda), 0), (FT(alpha^2*lambda), 0), (alpha, e^(2*pi*im/n)), (lambda, lambdaVal)))
        output2 = SymPy.N(subs(formula2, (FT(lambda), 1), (FT(alpha*lambda), 0), (FT(alpha^2*lambda), 0), (alpha, e^(2*pi*im/n)), (lambda, lambdaVal)))
        println("Formula1 = $output1")
        println("Formula2 = $output2")
        println("-----------------------------------------------------------------")
        result = is_approx(output1-output2, 0)
        append!(results, result)


        println(FT(alpha*lambda))
        output1 = SymPy.N(subs(formula1, (FT(lambda), 0), (FT(alpha*lambda), 1), (FT(alpha^2*lambda), 0), (alpha, e^(2*pi*im/n)), (lambda, lambdaVal)))
        output2 = SymPy.N(subs(formula2, (FT(lambda), 0), (FT(alpha*lambda), 1), (FT(alpha^2*lambda), 0), (alpha, e^(2*pi*im/n)), (lambda, lambdaVal)))
        println("Formula1 = $output1")
        println("Formula2 = $output2")
        println("-----------------------------------------------------------------")
        result = is_approx(output1-output2, 0)
        append!(results, result)

        println(FT(alpha^2*lambda))
        output1 = SymPy.N(subs(formula1, (FT(lambda), 0), (FT(alpha*lambda), 0), (FT(alpha^2*lambda), 1), (alpha, e^(2*pi*im/n)), (lambda, lambdaVal)))
        output2 = SymPy.N(subs(formula2, (FT(lambda), 0), (FT(alpha*lambda), 0), (FT(alpha^2*lambda), 1), (alpha, e^(2*pi*im/n)), (lambda, lambdaVal)))
        println("Formula1 = $output1")
        println("Formula2 = $output2")
        println("-----------------------------------------------------------------")
        result = is_approx(output1-output2, 0)
        append!(results, result)
        println("=================================================================")
    end
    return all(results)
end
Out[181]:
test_formula (generic function with 1 method)
In [182]:
test_formula(FPlusFormula, FPlusSymGeneric)
i = 1
lambda = 40.85355612954356 + 6.189506861134134im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.0003204956357787785 + 0.0005672070033243562im
Formula2 = 0.0003204956357787759 + 0.000567207003324345im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 2.797686159006198e-15 + 1.1477777410313568e-15im
Formula2 = 2.7976861590061755e-15 + 1.1477777410313e-15im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.15883444745611375 - 0.000567207003325504im
Formula2 = 0.15883444745611378 - 0.0005672070033254929im
-----------------------------------------------------------------
=================================================================
i = 2
lambda = 44.77262481170945 - 45.417320022496945im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494309189535 - 3.3881317890172014e-21im
Formula2 = 0.15915494309189535 - 4.235164736271502e-21im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 5.376947902839275e-48 + 2.5837780217253342e-48im
Formula2 = 5.376947902839273e-48 + 2.583778021725354e-48im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 3.95555003992852e-22 + 1.4476486421761342e-21im
Formula2 = 3.955550039928763e-22 + 1.4476486421761623e-21im
-----------------------------------------------------------------
=================================================================
i = 3
lambda = -20.080813231858595 + 14.475458863562054im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 1.069623360595849e-7 + 1.2501418360476012e-7im
Formula2 = 1.0696233605958595e-7 + 1.2501418360476086e-7im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.15916594027489261 - 5.652892117883212e-6im
Formula2 = 0.15916594027489261 - 5.652892117883289e-6im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -1.1104145333325572e-5 + 5.5278779342784534e-6im
Formula2 = -1.1104145333325633e-5 + 5.527877934278527e-6im
-----------------------------------------------------------------
=================================================================
i = 4
lambda = -43.36750751166507 - 44.13979090852411im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494309189535 + 3.3881317890172014e-21im
Formula2 = 0.15915494309189535 + 3.3881317890172014e-21im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -4.888649221692234e-21 - 2.256300984927818e-21im
Formula2 = -4.888649221692212e-21 - 2.256300984927685e-21im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 1.6596831238119157e-47 - 1.3587742875171095e-46im
Formula2 = 1.659683123811833e-47 - 1.3587742875171107e-46im
-----------------------------------------------------------------
=================================================================
i = 5
lambda = -17.256396586436566 - 35.96951238257884im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494309189535 - 8.816554189733199e-19im
Formula2 = 0.15915494309189535 - 8.809142651444724e-19im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -1.4079171139684633e-18 + 8.816484970215232e-19im
Formula2 = -1.4079171139684624e-18 + 8.816484970215249e-19im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 7.358526751048506e-32 - 1.6687064228383875e-31im
Formula2 = 7.358526751048512e-32 - 1.6687064228383894e-31im
-----------------------------------------------------------------
=================================================================
i = 6
lambda = -43.005093824147544 - 4.2395544838172725im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.16030740958810358 + 8.13859797299276e-5im
Formula2 = 0.16030740958810355 + 8.138597972992052e-5im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -0.0011524664962082353 - 8.138597972992762e-5im
Formula2 = -0.00115246649620822 - 8.138597972992053e-5im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 7.642039757225962e-21 + 1.690922542798806e-20im
Formula2 = 7.642039757226044e-21 + 1.6909225427988026e-20im
-----------------------------------------------------------------
=================================================================
i = 7
lambda = -36.163508522014354 + 29.20447506806103im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -5.827856300926675e-14 - 3.096585704783189e-14im
Formula2 = -5.827856300926774e-14 - 3.0965857047832064e-14im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.15915494457995602 + 1.7437631901797715e-8im
Formula2 = 0.15915494457995602 + 1.743763190179941e-8im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -1.488002401644726e-9 - 1.743760093594177e-8im
Formula2 = -1.488002401644988e-9 - 1.7437600935941997e-8im
-----------------------------------------------------------------
=================================================================
i = 8
lambda = 15.146983799418408 - 45.563235083911955im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494309189535
Formula2 = 0.15915494309189535 - 2.117582368135751e-22im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 6.653622020863788e-37 - 1.1047411031207399e-38im
Formula2 = 6.65362202086379e-37 - 1.1047411031207214e-38im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 2.1192904687011762e-26 - 1.634207781850279e-25im
Formula2 = 2.1192904687011874e-26 - 1.634207781850279e-25im
-----------------------------------------------------------------
=================================================================
i = 9
lambda = 35.320615188388274 + 29.919698333649606im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -7.6565081359212e-15 + 3.135552810599331e-14im
Formula2 = -7.656508135920529e-15 + 3.1355528105993165e-14im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 5.8463887625976395e-9 + 5.159664715060154e-8im
Formula2 = 5.84638876259833e-9 + 5.159664715060091e-8im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.15915493724551422 - 5.15966785061298e-8im
Formula2 = 0.15915493724551422 - 5.1596678506130646e-8im
-----------------------------------------------------------------
=================================================================
i = 10
lambda = 29.89319657344282 + 17.985699791423443im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -4.37205632316526e-9 + 2.2513709676551603e-9im
Formula2 = -4.372056323165197e-9 + 2.251370967655185e-9im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -5.285981620656353e-9 + 1.3642367263095362e-8im
Formula2 = -5.285981620656147e-9 + 1.3642367263095276e-8im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.15915495274993327 - 1.589373823075091e-8im
Formula2 = 0.15915495274993327 - 1.58937382307471e-8im
-----------------------------------------------------------------
=================================================================
i = 11
lambda = 1.8806740053035824 - 27.756919084100073im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494309189535 - 3.9725845226226686e-19im
Formula2 = 0.15915494309189535 - 3.9641141931501256e-19im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -6.404771865015365e-21 - 2.504414776812792e-20im
Formula2 = -6.4047718650153595e-21 - 2.5044147768127928e-20im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -5.225681684360382e-19 + 4.219559336200932e-19im
Formula2 = -5.225681684360386e-19 + 4.2195593362009292e-19im
-----------------------------------------------------------------
=================================================================
i = 12
lambda = 17.44189647599231 - 34.58810704617399im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494309189535 + 1.4640117460343327e-17im
Formula2 = 0.15915494309189535 + 1.4640117460343327e-17im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 9.610090908987087e-31 - 3.725717975962523e-31im
Formula2 = 9.610090908987095e-31 - 3.7257179759625695e-31im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -4.106625866401675e-18 - 1.463963165971667e-17im
Formula2 = -4.106625866401678e-18 - 1.4639631659716723e-17im
-----------------------------------------------------------------
=================================================================
i = 13
lambda = -11.027584490786559 + 9.89296933230672im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -1.3864166116091771e-5 - 7.617685281725356e-6im
Formula2 = -1.3864166116091868e-5 - 7.617685281725386e-6im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.15638574945271247 - 0.0014363956827419012im
Formula2 = 0.15638574945271247 - 0.0014363956827418965im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.0027830578052989567 + 0.0014440133680236253im
Formula2 = 0.0027830578052989705 + 0.0014440133680236218im
-----------------------------------------------------------------
=================================================================
i = 14
lambda = -27.1707357917794 + 33.776876019840245im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 6.82626727121434e-16 + 3.836598117234396e-17im
Formula2 = 6.82626727121444e-16 + 3.8365981172337505e-17im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.1593974567174578 + 0.000338298464563998im
Formula2 = 0.1593974567174578 + 0.0003382984645639977im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -0.00024251362556315092 - 0.00033829846456403617im
Formula2 = -0.0002425136255631561 - 0.00033829846456403606im
-----------------------------------------------------------------
=================================================================
i = 15
lambda = -21.625950201500576 - 24.630844245075913im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.1591549430906537 - 1.0065318024855222e-12im
Formula2 = 0.1591549430906537 - 1.0065318024855222e-12im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 1.241647409970243e-12 + 1.0065318018238242e-12im
Formula2 = 1.241647409970248e-12 + 1.006531801823806e-12im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -1.1778821626718565e-26 + 1.0457977125e-25im
Formula2 = -1.1778821626718248e-26 + 1.0457977125000028e-25im
-----------------------------------------------------------------
=================================================================
i = 16
lambda = 31.66500267508961 - 13.796433970753384im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.1591549650797954 - 7.807294070719356e-8im
Formula2 = 0.1591549650797954 - 7.807294070719525e-8im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 1.103502612944813e-22 - 1.688450572146419e-22im
Formula2 = 1.103502612944816e-22 - 1.688450572146421e-22im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -2.1987900076208192e-8 + 7.807294070719401e-8im
Formula2 = -2.1987900076208358e-8 + 7.807294070719529e-8im
-----------------------------------------------------------------
=================================================================
i = 17
lambda = -48.87734950198956 + 13.97743553849375im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -2.551422519975735e-7 - 9.052200078294684e-8im
Formula2 = -2.5514225199757887e-7 - 9.052200078294963e-8im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.15915519823414742 + 9.052200089816959e-8im
Formula2 = 0.15915519823414742 + 9.052200089817213e-8im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -8.436738134642038e-17 - 1.152215906670218e-16im
Formula2 = -8.436738134642249e-17 - 1.1522159066702305e-16im
-----------------------------------------------------------------
=================================================================
i = 18
lambda = 30.8634978558282 + 33.814155481849184im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -5.782097978306347e-16 - 3.1188196201141273e-16im
Formula2 = -5.782097978306354e-16 - 3.1188196201140144e-16im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 1.6431871069259728e-5 + 5.331095244715763e-6im
Formula2 = 1.6431871069259575e-5 + 5.331095244715449e-6im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.15913851122082665 - 5.3310952444038795e-6im
Formula2 = 0.15913851122082665 - 5.331095244403566e-6im
-----------------------------------------------------------------
=================================================================
i = 19
lambda = 24.94532634416376 + 48.50501311587783im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 9.67254935813661e-24 - 1.892075482266484e-24im
Formula2 = 9.672549358136662e-24 - 1.8920754822664313e-24im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.07668414307360431 - 0.14277762511839884im
Formula2 = 0.07668414307360448 - 0.14277762511839898im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.08247080001829105 + 0.14277762511839875im
Formula2 = 0.08247080001829087 + 0.14277762511839898im
-----------------------------------------------------------------
=================================================================
i = 20
lambda = 44.80404488820973 + 41.226639159857385im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 1.1650057206158289e-19 - 3.7909883528291006e-19im
Formula2 = 1.1650057206157482e-19 - 3.7909883528290636e-19im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 3.5064217659953566e-9 - 1.9589266817436625e-9im
Formula2 = 3.5064217659952644e-9 - 1.958926681743711e-9im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.15915493958547358 + 1.9589266821237e-9im
Formula2 = 0.15915493958547358 + 1.958926682124547e-9im
-----------------------------------------------------------------
=================================================================
i = 21
lambda = -48.64376989625381 - 49.53149255881804im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494309189535
Formula2 = 0.15915494309189535 + 3.3881317890172014e-21im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -2.0584207936374476e-23 + 1.3325331666749383e-23im
Formula2 = -2.0584207936373882e-23 + 1.3325331666749768e-23im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -9.728111378927865e-53 + 4.2505181713244256e-52im
Formula2 = -9.728111378927386e-53 + 4.250518171324447e-52im
-----------------------------------------------------------------
=================================================================
i = 22
lambda = 35.608713737882056 - 8.231663860404971im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15916560242785469 + 1.829809649470592e-5im
Formula2 = 0.15916560242785469 + 1.8298096494706194e-5im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 1.8670072259077068e-20 + 2.0819056456694438e-20im
Formula2 = 1.8670072259077065e-20 + 2.0819056456694504e-20im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -1.0659335959353213e-5 - 1.829809649470594e-5im
Formula2 = -1.0659335959353325e-5 - 1.8298096494706218e-5im
-----------------------------------------------------------------
=================================================================
i = 23
lambda = 41.06198083597047 + 33.74016652808278im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 2.106281619401e-16 + 6.753440364815196e-16im
Formula2 = 2.1062816194010952e-16 + 6.753440364815073e-16im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 2.174376191758748e-11 + 2.4299256495321644e-9im
Formula2 = 2.1743761917622638e-11 + 2.4299256495321296e-9im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.15915494307015135 - 2.42992632487578e-9im
Formula2 = 0.15915494307015135 - 2.429926324878321e-9im
-----------------------------------------------------------------
=================================================================
i = 24
lambda = -22.797906106482955 + 49.97947231578728im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -8.470020187564001e-26 + 1.420110809025097e-25im
Formula2 = -8.470020187563989e-26 + 1.4201108090250998e-25im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.07970051030466425 - 0.1382337359966876im
Formula2 = 0.07970051030466431 - 0.13823373599668762im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.0794544327872311 + 0.13823373599668753im
Formula2 = 0.07945443278723102 + 0.13823373599668762im
-----------------------------------------------------------------
=================================================================
i = 25
lambda = 5.374927830315457 - 11.553884062689626im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915515379051778 + 4.73528515842326e-7im
Formula2 = 0.15915515379051778 + 4.7352851584232767e-7im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -1.5369420828918776e-11 - 7.407776042229781e-12im
Formula2 = -1.5369420828918944e-11 - 7.407776042229733e-12im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -2.1068325301478745e-7 - 4.73521108066283e-7im
Formula2 = -2.1068325301478745e-7 - 4.7352110806628516e-7im
-----------------------------------------------------------------
=================================================================
i = 26
lambda = 48.86778595170351 - 45.14931614489639im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494309189535 + 6.749793798432706e-22im
Formula2 = 0.15915494309189535 - 3.3881317890172014e-21im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 2.4089980454831663e-49 + 8.965780266867224e-50im
Formula2 = 2.408998045483163e-49 + 8.965780266867237e-50im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -1.842680552235519e-21 - 6.73673022908738e-22im
Formula2 = -1.842680552235578e-21 - 6.736730229087326e-22im
-----------------------------------------------------------------
=================================================================
i = 27
lambda = -42.52907395872037 - 47.98521544273202im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494309189535
Formula2 = 0.15915494309189535 - 8.470329472543003e-22im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -1.0574226516100823e-22 + 4.54602439426767e-23im
Formula2 = -1.0574226516100605e-22 + 4.5460243942678966e-23im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 8.57739771187206e-49 + 2.1540757779273897e-49im
Formula2 = 8.577397711872121e-49 + 2.154075777927305e-49im
-----------------------------------------------------------------
=================================================================
i = 28
lambda = -42.28165358082887 + 23.564826863597418im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -1.4743237143847862e-11 - 1.1288251102826651e-11im
Formula2 = -1.47432371438481e-11 - 1.1288251102826748e-11im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.15915494311155706 + 9.55206654706497e-12im
Formula2 = 0.15915494311155706 + 9.55206654706497e-12im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -4.91850090205558e-12 + 1.7361845571812757e-12im
Formula2 = -4.918500902055661e-12 + 1.7361845571813805e-12im
-----------------------------------------------------------------
=================================================================
i = 29
lambda = 45.0222149978197 - 37.54816827014im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494309189535 - 3.4133310191980168e-18im
Formula2 = 0.15915494309189535 - 3.415236843329339e-18im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 5.765044201506314e-43 - 2.842910507107795e-43im
Formula2 = 5.765044201506279e-43 - 2.8429105071078135e-43im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 1.937650724500782e-18 + 3.4132531140210566e-18im
Formula2 = 1.9376507245008565e-18 + 3.4132531140210943e-18im
-----------------------------------------------------------------
=================================================================
i = 30
lambda = -13.174154816354374 - 1.4638750745748368im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.1555947132241137 + 0.017760667643068544im
Formula2 = 0.15559471322411375 + 0.01776066764306848im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.0035604175194556727 - 0.017760714045341484im
Formula2 = 0.0035604175194556054 - 0.017760714045341425im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -1.8765167402124602e-7 + 4.6402272943331926e-8im
Formula2 = -1.876516740212462e-7 + 4.640227294333214e-8im
-----------------------------------------------------------------
=================================================================
i = 31
lambda = 24.604950652883545 + 25.345491115750775im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -2.7154790142315894e-12 - 1.5535070562478796e-12im
Formula2 = -2.7154790142316007e-12 - 1.5535070562478285e-12im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -1.223442665603963e-5 - 5.518908819848707e-5im
Formula2 = -1.2234426656040154e-5 - 5.518908819848655e-5im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.15916717752126686 + 5.518908975199411e-5im
Formula2 = 0.15916717752126686 + 5.518908975199361e-5im
-----------------------------------------------------------------
=================================================================
i = 32
lambda = -8.09510836125611 - 7.26039322817924im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15910066517357133 + 1.4815941210963917e-5im
Formula2 = 0.15910066517357133 + 1.4815941210964093e-5im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 5.42803958382524e-5 - 1.4817064146633327e-5im
Formula2 = 5.428039583825218e-5 - 1.4817064146633503e-5im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -2.477514232162897e-9 + 1.1229356694104024e-9im
Formula2 = -2.4775142321628954e-9 + 1.1229356694103968e-9im
-----------------------------------------------------------------
=================================================================
i = 33
lambda = 20.340020158899023 - 25.426445459493017im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.1591549430913035 - 4.114686962667139e-13im
Formula2 = 0.1591549430913035 - 4.1146869711374684e-13im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 5.748813103197083e-26 + 7.800626005272343e-26im
Formula2 = 5.748813103197111e-26 + 7.80062600527236e-26im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 5.918316326677549e-13 + 4.11468697336269e-13im
Formula2 = 5.918316326677642e-13 + 4.114686973362683e-13im
-----------------------------------------------------------------
=================================================================
i = 34
lambda = 30.706461080349044 - 41.03364594152408im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494309189535 - 3.8963515573697816e-20im
Formula2 = 0.15915494309189535 - 3.7269449679189215e-20im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 3.797306334398908e-40 - 7.42883968640212e-40im
Formula2 = 3.797306334398924e-40 - 7.428839686402083e-40im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -1.1349421686362776e-19 + 3.9712049088442257e-20im
Formula2 = -1.134942168636286e-19 + 3.9712049088443833e-20im
-----------------------------------------------------------------
=================================================================
i = 35
lambda = -47.70874731198973 - 26.843929827989733im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494309190603 - 1.745035060259103e-13im
Formula2 = 0.15915494309190603 - 1.7450350517887736e-13im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -1.0703255370212917e-14 + 1.7450350529630798e-13im
Formula2 = -1.070325537021006e-14 + 1.7450350529630545e-13im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 2.183308402065278e-37 + 5.480765224645821e-37im
Formula2 = 2.1833084020653186e-37 + 5.480765224645796e-37im
-----------------------------------------------------------------
=================================================================
i = 36
lambda = -12.585444385980146 - 34.24719446515474im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494309189535 - 1.505071668152485e-19im
Formula2 = 0.15915494309189535 - 1.4568966692773966e-19im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 3.956003393249633e-19 + 1.5046942069274584e-19im
Formula2 = 3.956003393249634e-19 + 1.5046942069274604e-19im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 1.3772696018328979e-28 - 4.373259624082816e-29im
Formula2 = 1.3772696018328983e-28 - 4.3732596240828066e-29im
-----------------------------------------------------------------
=================================================================
i = 37
lambda = 27.521005371617264 - 17.387844299862707im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494095237526 + 6.474859553733629e-10im
Formula2 = 0.15915494095237526 + 6.474859553733629e-10im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -1.543290084193763e-23 + 2.961892979527287e-23im
Formula2 = -1.5432900841937898e-23 + 2.961892979527305e-23im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 2.1395200874135504e-9 - 6.474859553721817e-10im
Formula2 = 2.139520087413582e-9 - 6.474859553721961e-10im
-----------------------------------------------------------------
=================================================================
i = 38
lambda = 8.79397712807166 - 35.00312508401071im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494309189535 + 3.3881317890172014e-21im
Formula2 = 0.15915494309189535 + 5.082197683525802e-21im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 1.1529975268636557e-27 + 4.4395639667113435e-28im
Formula2 = 1.1529975268636558e-27 + 4.439563966711348e-28im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -2.329277797465644e-22 - 5.085764035704008e-21im
Formula2 = -2.3292777974656107e-22 - 5.085764035704009e-21im
-----------------------------------------------------------------
=================================================================
i = 39
lambda = -39.7351890280508 - 47.04274289780655im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494309189535
Formula2 = 0.15915494309189535
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 2.9488271819649725e-22 - 1.7213921885924892e-23im
Formula2 = 2.948827181964956e-22 - 1.721392188593176e-23im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -4.0867471425112146e-47 - 5.320596490245401e-49im
Formula2 = -4.086747142511255e-47 - 5.320596490244702e-49im
-----------------------------------------------------------------
=================================================================
i = 40
lambda = -2.514194310900649 - 21.3105035878282im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494309188277 + 1.313530583130565e-14im
Formula2 = 0.15915494309188277 + 1.313530244317386e-14im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 1.2670605242401257e-14 - 1.3342652828321844e-14im
Formula2 = 1.2670605242401265e-14 - 1.3342652828321844e-14im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -1.1335407051724016e-16 + 2.0734655274389973e-16im
Formula2 = -1.133540705172403e-16 + 2.0734655274389968e-16im
-----------------------------------------------------------------
=================================================================
i = 41
lambda = 18.491009749139153 - 46.82889871415152im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494309189535 - 8.470329472543003e-22im
Formula2 = 0.15915494309189535
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -3.850700424510463e-39 + 3.935491228043761e-39im
Formula2 = -3.850700424510466e-39 + 3.935491228043761e-39im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 1.3186623283458022e-25 - 4.274431554707461e-25im
Formula2 = 1.3186623283458055e-25 - 4.274431554707461e-25im
-----------------------------------------------------------------
=================================================================
i = 42
lambda = 1.2819569127485266 + 33.71182577296368im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -1.4467097620606177e-23 + 5.655409920757913e-23im
Formula2 = -1.4467097620606333e-23 + 5.655409920757933e-23im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.07957747264860485 - 0.13783223574972667im
Formula2 = 0.0795774726486049 - 0.1378322357497267im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.07957747044329051 + 0.1378322357497266im
Formula2 = 0.07957747044329043 + 0.1378322357497267im
-----------------------------------------------------------------
=================================================================
i = 43
lambda = -28.557045286100234 + 39.73044263115568im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 4.142681944144975e-19 - 1.7459699507306716e-18im
Formula2 = 4.1426819441448053e-19 - 1.745969950730708e-18im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.16132764036660552 + 0.0012070117810329712im
Formula2 = 0.16132764036660557 + 0.001207011781032981im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -0.002172697274710193 - 0.0012070117810329686im
Formula2 = -0.002172697274710248 - 0.0012070117810329792im
-----------------------------------------------------------------
=================================================================
i = 44
lambda = 23.622942304117075 - 7.3008719797982735im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15920301951554172 + 2.3984415881040153e-5im
Formula2 = 0.15920301951554172 + 2.398441588104044e-5im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 2.4367901263996943e-15 - 2.7032307268827095e-15im
Formula2 = 2.436790126399701e-15 - 2.703230726882718e-15im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -4.807642364883223e-5 - 2.398441587833692e-5im
Formula2 = -4.807642364883279e-5 - 2.398441587833721e-5im
-----------------------------------------------------------------
=================================================================
i = 45
lambda = 6.468960124410941 + 45.50549302824652im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 5.762830584775169e-29 + 7.911453791123058e-29im
Formula2 = 5.762830584775174e-29 + 7.91145379112307e-29im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.07957747219731276 - 0.13783222661387723im
Formula2 = 0.07957747219731282 - 0.13783222661387723im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.0795774708945826 + 0.13783222661387717im
Formula2 = 0.07957747089458252 + 0.13783222661387723im
-----------------------------------------------------------------
=================================================================
i = 46
lambda = -32.137794510435235 - 35.09655869280217im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494309189532 + 4.466235324282475e-17im
Formula2 = 0.15915494309189532 + 4.4663200275772e-17im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 8.973493094742435e-18 - 4.466303178171041e-17im
Formula2 = 8.973493094741618e-18 - 4.466303178171019e-17im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -9.065603445420836e-37 + 1.5351270177030303e-36im
Formula2 = -9.065603445420858e-37 + 1.535127017703041e-36im
-----------------------------------------------------------------
=================================================================
i = 47
lambda = -42.818424306739345 + 15.488954166239324im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -5.9308942229153e-8 - 6.951463159951088e-9im
Formula2 = -5.93089422291539e-8 - 6.9514631599510656e-9im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.15915500240087857 + 6.951422454098879e-9im
Formula2 = 0.15915500240087857 + 6.951422454098879e-9im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -4.100995188029796e-14 + 4.0705852808939586e-14im
Formula2 = -4.100995188029827e-14 + 4.070585280894044e-14im
-----------------------------------------------------------------
=================================================================
i = 48
lambda = -48.51720695767323 + 1.7228658458610795im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.03976599426901252 - 0.06301772305358065im
Formula2 = -0.03976599426901245 - 0.0630177230535829im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.19892093736090785 + 0.06301772305358065im
Formula2 = 0.1989209373609078 + 0.0630177230535829im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 5.54010324670165e-19 - 6.820451386782542e-20im
Formula2 = 5.540103246701763e-19 - 6.820451386782073e-20im
-----------------------------------------------------------------
=================================================================
i = 49
lambda = 32.12896672523648 + 25.712880438382356im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 4.0809449348253107e-13 - 2.12837430332804e-12im
Formula2 = 4.080944934824998e-13 - 2.1283743033280217e-12im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 9.204620510988247e-8 + 4.042464045227788e-8im
Formula2 = 9.204620510988237e-8 + 4.0424640452275456e-8im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.15915485104528213 - 4.042251207797361e-8im
Formula2 = 0.15915485104528213 - 4.042251207797234e-8im
-----------------------------------------------------------------
=================================================================
i = 50
lambda = -24.383988520957267 - 33.19145445991643im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494309189562 + 9.125170644065303e-17im
Formula2 = 0.15915494309189562 + 9.125255347360028e-17im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -2.915013750152793e-16 - 9.125287724593128e-17im
Formula2 = -2.9150137501527817e-16 - 9.125287724592557e-17im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -4.6819861658961665e-34 - 2.5688990575019584e-32im
Formula2 = -4.6819861658976316e-34 - 2.568899057501953e-32im
-----------------------------------------------------------------
=================================================================
i = 51
lambda = 49.305044432302864 + 19.4256720264044im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -1.1607839469221826e-9 - 1.0096251524685383e-10im
Formula2 = -1.1607839469221631e-9 - 1.0096251524684016e-10im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -1.3770762832817114e-15 - 6.022148345226281e-16im
Formula2 = -1.3770762832817008e-15 - 6.022148345225995e-16im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.15915494425268065 + 1.0096311746272426e-10im
Formula2 = 0.15915494425268065 + 1.0096311746166546e-10im
-----------------------------------------------------------------
=================================================================
i = 52
lambda = 0.9741972769846257 + 47.53932321532078im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 2.504215212384661e-32 + 3.292967824697249e-32im
Formula2 = 2.504215212384667e-32 + 3.2929678246972365e-32im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.07957747154153376 - 0.13783222386160202im
Formula2 = 0.07957747154153381 - 0.13783222386160204im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.07957747155036159 + 0.13783222386160196im
Formula2 = 0.07957747155036152 + 0.13783222386160204im
-----------------------------------------------------------------
=================================================================
i = 53
lambda = 10.638731918135427 + 49.94940912753529im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 2.2547698037747373e-31 - 4.607928591861971e-30im
Formula2 = 2.2547698037750894e-31 - 4.607928591861975e-30im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.07957747020898463 - 0.13783223514623635im
Formula2 = 0.0795774702089847 - 0.13783223514623635im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.07957747288291071 + 0.1378322351462363im
Formula2 = 0.07957747288291063 + 0.13783223514623635im
-----------------------------------------------------------------
=================================================================
i = 54
lambda = 16.555890184064353 - 32.38070855689477im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494309189537 - 3.00471385511307e-16im
Formula2 = 0.15915494309189537 - 3.0046969144541247e-16im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 4.296843708899268e-29 - 9.666281242436778e-29im
Formula2 = 4.296843708899306e-29 - 9.666281242436739e-29im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -4.5792431326097036e-17 + 3.0047050735007534e-16im
Formula2 = -4.5792431326097566e-17 + 3.0047050735007367e-16im
-----------------------------------------------------------------
=================================================================
i = 55
lambda = -13.65033636805142 + 44.227063360939425im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -1.2700960372385048e-25 + 3.0952757520115734e-25im
Formula2 = -1.270096037238513e-25 + 3.0952757520115807e-25im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.0795763563069741 - 0.1378297672237128im
Formula2 = 0.07957635630697417 - 0.13782976722371282im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.07957858678492125 + 0.13782976722371273im
Formula2 = 0.07957858678492116 + 0.13782976722371282im
-----------------------------------------------------------------
=================================================================
i = 56
lambda = 28.620994455228228 - 22.51827263873487im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494308956843 + 1.3013505443812115e-11im
Formula2 = 0.15915494308956843 + 1.3013505444553269e-11im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 7.702839854568465e-28 - 5.8082871429812906e-27im
Formula2 = 7.7028398545683915e-28 - 5.808287142981295e-27im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 2.326917500309094e-12 - 1.3013505443940133e-11im
Formula2 = 2.3269175003090692e-12 - 1.3013505443940335e-11im
-----------------------------------------------------------------
=================================================================
i = 57
lambda = -8.069468022399143 - 25.857926512557693im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494309189424 + 2.1926608274815303e-15im
Formula2 = 0.15915494309189424 + 2.1926616745144775e-15im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 1.1073463913616978e-15 - 2.1926619595314676e-15im
Formula2 = 1.1073463913616986e-15 - 2.192661959531468e-15im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 2.053514864800383e-21 + 3.7631220947598225e-22im
Formula2 = 2.053514864800383e-21 + 3.7631220947598357e-22im
-----------------------------------------------------------------
=================================================================
i = 58
lambda = -25.00034020688242 - 40.97974137534044im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494309189535 + 1.1604351377383915e-19im
Formula2 = 0.15915494309189535 + 1.2197274440461925e-19im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -6.363738590406296e-20 - 1.160565822429229e-19im
Formula2 = -6.363738590406584e-20 - 1.1605658224292137e-19im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 6.852341773279955e-38 - 1.2946028964952455e-37im
Formula2 = 6.852341773279853e-38 - 1.2946028964952597e-37im
-----------------------------------------------------------------
=================================================================
i = 59
lambda = 41.13018370003914 - 34.83114889131305im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494309189532 + 5.778119952989935e-17im
Formula2 = 0.15915494309189532 + 5.778119952989935e-17im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -1.0940025044309424e-39 + 1.260233420073222e-40im
Formula2 = -1.0940025044309471e-39 + 1.2602334200732538e-40im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 1.3780894578041648e-17 - 5.778322238094583e-17im
Formula2 = 1.378089457804138e-17 - 5.778322238094703e-17im
-----------------------------------------------------------------
=================================================================
i = 60
lambda = 8.032938408815205 - 13.031421638375342im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915480864280904 - 2.6251576128522598e-8im
Formula2 = 0.15915480864280904 - 2.625157612852175e-8im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -2.658642126360558e-13 + 4.2654556755150077e-13im
Formula2 = -2.658642126360553e-13 + 4.2654556755150163e-13im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 1.344493521582709e-7 + 2.625114958295499e-8im
Formula2 = 1.3444935215827152e-7 + 2.6251149582954576e-8im
-----------------------------------------------------------------
=================================================================
i = 61
lambda = 20.8626764430998 - 0.4120957717100211im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.11961314242168335 - 0.002417633660861244im
Formula2 = 0.11961314242168307 - 0.002417633660861292im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -8.229730339492354e-10 - 4.062946285440693e-10im
Formula2 = -8.22973033949237e-10 - 4.0629462854406684e-10im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.039541801493185015 + 0.0024176340671558725im
Formula2 = 0.039541801493185307 + 0.0024176340671559207im
-----------------------------------------------------------------
=================================================================
i = 62
lambda = -7.076555484312408 - 40.228622333134844im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494309189535 - 1.6940658945086007e-21im
Formula2 = 0.15915494309189535
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -4.1347124648906796e-25 - 1.8680595693315074e-25im
Formula2 = -4.1347124648906805e-25 - 1.868059569331509e-25im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 8.096477642516396e-31 - 1.998222162746534e-30im
Formula2 = 8.09647764251641e-31 - 1.998222162746534e-30im
-----------------------------------------------------------------
=================================================================
i = 63
lambda = 33.97851422837847 + 15.977997682178895im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 3.267730894026804e-8 + 1.6524721507307687e-8im
Formula2 = 3.26773089402678e-8 + 1.6524721507307118e-8im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -1.0236306578460581e-11 + 1.5553524090547319e-10im
Formula2 = -1.0236306578458238e-11 + 1.5553524090547225e-10im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.15915491042482272 - 1.668025674821188e-8im
Formula2 = 0.15915491042482272 - 1.6680256748212568e-8im
-----------------------------------------------------------------
=================================================================
i = 64
lambda = -45.78696328788831 - 11.845681586966485im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915439634567458 + 1.6299408301056228e-7im
Formula2 = 0.15915439634567458 + 1.6299408301056355e-7im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 5.46746220748465e-7 - 1.6299408301056252e-7im
Formula2 = 5.467462207484529e-7 - 1.629940830105639e-7im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 5.469431384883335e-27 - 1.7536927128634537e-26im
Formula2 = 5.469431384883421e-27 - 1.7536927128634434e-26im
-----------------------------------------------------------------
=================================================================
i = 65
lambda = 0.3307356613767354 + 34.92770918699645im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 2.46761563467138e-24 + 2.8185395721684793e-24im
Formula2 = 2.4676156346713794e-24 + 2.818539572168465e-24im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.07957747266481296 - 0.13783222769230252im
Formula2 = 0.07957747266481303 - 0.13783222769230252im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.07957747042708238 + 0.13783222769230244im
Formula2 = 0.07957747042708231 + 0.13783222769230252im
-----------------------------------------------------------------
=================================================================
i = 66
lambda = -19.188569689688627 + 13.227072222589811im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -1.0521168508522125e-7 + 5.635429074422855e-7im
Formula2 = -1.0521168508522095e-7 + 5.635429074422896e-7im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.15914920356383544 - 1.3711617304255325e-5im
Formula2 = 0.15914920356383544 - 1.3711617304255403e-5im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 5.844739744970211e-6 + 1.3148074396813034e-5im
Formula2 = 5.844739744970294e-6 + 1.3148074396813107e-5im
-----------------------------------------------------------------
=================================================================
i = 67
lambda = 36.13611399640202 - 22.365543207532657im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494310529293 + 7.596414643829376e-12im
Formula2 = 0.15915494310529293 + 7.59641464213531e-12im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 1.0565076626261996e-29 - 3.009722472349519e-30im
Formula2 = 1.0565076626261952e-29 - 3.009722472349543e-30im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -1.3397587545392617e-11 - 7.596414644635632e-12im
Formula2 = -1.3397587545392832e-11 - 7.596414644635703e-12im
-----------------------------------------------------------------
=================================================================
i = 68
lambda = -23.273817082820237 - 46.975597700114726im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494309189535 - 8.470329472543003e-22im
Formula2 = 0.15915494309189535
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -1.3902942414163162e-23 + 1.5823229898197913e-23im
Formula2 = -1.3902942414163144e-23 + 1.5823229898197925e-23im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -4.757680593091734e-42 - 6.767127711369741e-41im
Formula2 = -4.757680593091781e-42 - 6.767127711369746e-41im
-----------------------------------------------------------------
=================================================================
i = 69
lambda = -24.257320986850427 - 41.47904224790948im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494309189535 + 4.2351647362715017e-20im
Formula2 = 0.15915494309189535 + 4.489274620447792e-20im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -7.075904713017633e-20 - 4.478056821677445e-20im
Formula2 = -7.07590471301772e-20 - 4.478056821677319e-20im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -1.2855377739848352e-37 - 9.037806163131257e-38im
Formula2 = -1.2855377739848446e-37 - 9.037806163131214e-38im
-----------------------------------------------------------------
=================================================================
i = 70
lambda = 22.394991819452812 - 20.002261803209255im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494307235079 + 1.6247766695602725e-10im
Formula2 = 0.15915494307235079 + 1.6247766695602725e-10im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 4.7422857730731637e-23 - 2.986982740794378e-23im
Formula2 = 4.7422857730731425e-23 - 2.986982740794384e-23im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 1.9544553872278896e-11 - 1.6247766695558166e-10im
Formula2 = 1.954455387227813e-11 - 1.6247766695558363e-10im
-----------------------------------------------------------------
=================================================================
i = 71
lambda = -13.979161548315247 + 32.438564017553745im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 1.3515047592823158e-17 - 1.6418626191470682e-17im
Formula2 = 1.3515047592823181e-17 - 1.6418626191470722e-17im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.08070943747563604 - 0.13847509814059766im
Formula2 = 0.0807094374756361 - 0.13847509814059766im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.0784455056162593 + 0.13847509814059764im
Formula2 = 0.07844550561625922 + 0.1384750981405977im
-----------------------------------------------------------------
=================================================================
i = 72
lambda = 22.02435757737564 - 2.66741633872023im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15645256780229952 + 0.004714192500686682im
Formula2 = 0.15645256780229946 + 0.004714192500686726im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -1.1209935184758241e-11 - 9.823213285338329e-12im
Formula2 = -1.1209935184758301e-11 - 9.823213285338342e-12im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.0027023753008057626 - 0.004714192490863469im
Formula2 = 0.0027023753008058008 - 0.004714192490863514im
-----------------------------------------------------------------
=================================================================
i = 73
lambda = -19.213058672443385 + 48.65653047453364im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -3.768964905038428e-26 + 3.8441659449339676e-26im
Formula2 = -3.7689649050384556e-26 + 3.8441659449339894e-26im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.07957413223573297 - 0.1377959604473029im
Formula2 = 0.07957413223573302 - 0.13779596044730294im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.07958081085616239 + 0.13779596044730286im
Formula2 = 0.07958081085616231 + 0.13779596044730294im
-----------------------------------------------------------------
=================================================================
i = 74
lambda = -31.797785045184067 - 32.82450506920564im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.1591549430918954 + 4.374315308846438e-16im
Formula2 = 0.1591549430918954 + 4.374330131923015e-16im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -6.242368855477126e-17 - 4.3743305437331734e-16im
Formula2 = -6.242368855477728e-17 - 4.3743305437331217e-16im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -6.600262841005248e-35 - 2.949567572671687e-35im
Formula2 = -6.600262841005243e-35 - 2.9495675726716524e-35im
-----------------------------------------------------------------
=================================================================
i = 75
lambda = -20.84974923004681 - 21.584584625911596im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.1591549430584099 + 3.152520638540824e-12im
Formula2 = 0.1591549430584099 + 3.152520638540824e-12im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 3.3485416743519645e-11 - 3.152520638280836e-12im
Formula2 = 3.348541674351943e-11 - 3.152520638281181e-12im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -1.9907529369027355e-23 - 3.0910099808383777e-25im
Formula2 = -1.9907529369027387e-23 - 3.091009980838429e-25im
-----------------------------------------------------------------
=================================================================
i = 76
lambda = -15.632404744923775 + 19.01075239285177im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 1.041520857149044e-9 - 1.5021387597114172e-9im
Formula2 = 1.041520857149048e-9 - 1.5021387597114358e-9im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.16100519268726585 + 0.005545252599193599im
Formula2 = 0.1610051926872659 + 0.005545252599193628im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -0.0018502506368913757 - 0.005545251097054837im
Formula2 = -0.0018502506368914175 - 0.005545251097054869im
-----------------------------------------------------------------
=================================================================
i = 77
lambda = 16.085372020712896 + 36.3604934757564im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 1.440659462446709e-19 + 3.350657052798325e-19im
Formula2 = 1.4406594624467228e-19 + 3.350657052798312e-19im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.07928357343607467 - 0.1367437551774868im
Formula2 = 0.07928357343607471 - 0.13674375517748683im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.07987136965582069 + 0.13674375517748674im
Formula2 = 0.07987136965582062 + 0.13674375517748683im
-----------------------------------------------------------------
=================================================================
i = 78
lambda = -32.33109475455349 - 40.67025129125675im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494309189535 + 1.6093625997831706e-19im
Formula2 = 0.15915494309189535 + 1.6093625997831706e-19im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 6.596543529781501e-20 - 1.5985272685289294e-19im
Formula2 = 6.59654352978109e-20 - 1.5985272685289327e-19im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -2.6772398412150805e-40 - 2.295668469633705e-40im
Formula2 = -2.6772398412151172e-40 - 2.2956684696336983e-40im
-----------------------------------------------------------------
=================================================================
i = 79
lambda = 34.20383679799836 - 16.23540508216672im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915493764972993 + 4.523870139389541e-9im
Formula2 = 0.15915493764972993 + 4.5238701393954706e-9im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -5.184252076709181e-25 - 2.52752962777584e-25im
Formula2 = -5.184252076709185e-25 - 2.5275296277758244e-25im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 5.4421653928731514e-9 - 4.523870139390836e-9im
Formula2 = 5.442165392873214e-9 - 4.52387013939091e-9im
-----------------------------------------------------------------
=================================================================
i = 80
lambda = 7.733444007730064 + 47.172115157338965im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -1.0036093261426975e-29 - 2.1822183609322748e-29im
Formula2 = -1.0036093261426873e-29 - 2.1822183609322827e-29im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.07957747427346176 - 0.13783222138156329im
Formula2 = 0.07957747427346182 - 0.1378322213815633im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.0795774688184336 + 0.13783222138156323im
Formula2 = 0.07957746881843351 + 0.1378322213815633im
-----------------------------------------------------------------
=================================================================
i = 81
lambda = -14.278736562662075 - 24.243783553681087im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.1591549430900721 + 2.5347474329705504e-13im
Formula2 = 0.1591549430900721 + 2.5347474499112094e-13im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 1.823225358472269e-12 - 2.534747437329622e-13im
Formula2 = 1.823225358472267e-12 - 2.534747437329761e-13im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -9.025781352977657e-23 - 7.686269414320596e-23im
Formula2 = -9.02578135297768e-23 - 7.686269414320621e-23im
-----------------------------------------------------------------
=================================================================
i = 82
lambda = -37.202065244165006 - 7.430553627344018im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15919516631155584 + 2.4678002134984853e-5im
Formula2 = 0.15919516631155584 + 2.4678002134984087e-5im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -4.022321966050519e-5 - 2.467800213498487e-5im
Formula2 = -4.0223219660504674e-5 - 2.4678002134984108e-5im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -1.4597890012714323e-20 + 1.8293158751169647e-20im
Formula2 = -1.4597890012714104e-20 + 1.829315875116966e-20im
-----------------------------------------------------------------
=================================================================
i = 83
lambda = -3.527330918213309 - 29.325768758771776im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494309189535 - 2.600391148070702e-19im
Formula2 = 0.15915494309189535 - 2.617331807015788e-19im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 5.395673344984396e-20 + 2.6019871770992847e-19im
Formula2 = 5.39567334498439e-20 + 2.601987177099285e-19im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -5.775041655802163e-22 + 1.2256306096835484e-22im
Formula2 = -5.775041655802165e-22 + 1.2256306096835446e-22im
-----------------------------------------------------------------
=================================================================
i = 84
lambda = -15.259546380177724 - 2.117641700150344im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15146266813249298 - 0.004892517923326802im
Formula2 = 0.151462668132493 - 0.004892517923326762im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.007692268424242517 + 0.004892527419651515im
Formula2 = 0.007692268424242492 + 0.004892527419651475im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 6.5351598364011135e-9 - 9.496324712490292e-9im
Formula2 = 6.5351598364011275e-9 - 9.496324712490315e-9im
-----------------------------------------------------------------
=================================================================
i = 85
lambda = -37.48181795279659 + 23.59600295093105im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -1.2148029124825223e-11 + 1.328048559337493e-11im
Formula2 = -1.2148029124825318e-11 + 1.3280485593375142e-11im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.1591549427963998 - 1.5412570866751407e-10im
Formula2 = 0.1591549427963998 - 1.5412570866582e-10im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 3.076435638195292e-10 + 1.4084522307394444e-10im
Formula2 = 3.0764356381953447e-10 + 1.4084522307394436e-10im
-----------------------------------------------------------------
=================================================================
i = 86
lambda = -38.185726647809574 + 37.952148004619175im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -3.8758102567123474e-19 + 1.0474757378630918e-17im
Formula2 = -3.875810256711679e-19 + 1.0474757378631142e-17im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.1591547509015065 - 1.454101783686785e-7im
Formula2 = 0.1591547509015065 - 1.4541017836867595e-7im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 1.9219038885457348e-7 + 1.4541017835820228e-7im
Formula2 = 1.921903888545782e-7 + 1.4541017835820167e-7im
-----------------------------------------------------------------
=================================================================
i = 87
lambda = 44.04158781620538 - 19.508298814830805im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494321199225 - 2.397977253522826e-10im
Formula2 = 0.15915494321199225 - 2.3979772535058855e-10im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -3.8669822889111607e-31 - 7.55620544590751e-31im
Formula2 = -3.86698228891115e-31 - 7.5562054459074295e-31im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -1.2009691084878483e-10 + 2.39797725349278e-10im
Formula2 = -1.2009691084878607e-10 + 2.397977253492821e-10im
-----------------------------------------------------------------
=================================================================
i = 88
lambda = -16.742497690693092 + 25.49544431277498im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -1.853322500548482e-12 - 3.672070468998487e-12im
Formula2 = -1.8533225005485414e-12 - 3.672070468998516e-12im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.19182570989882458 + 0.07773972969440616im
Formula2 = 0.19182570989882575 + 0.07773972969440666im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -0.03267076680507594 - 0.07773972969073406im
Formula2 = -0.03267076680507709 - 0.0777397296907346im
-----------------------------------------------------------------
=================================================================
i = 89
lambda = -15.052593595027375 - 40.71536301859413im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494309189535 - 1.6940658945086007e-21im
Formula2 = 0.15915494309189535 + 1.6940658945086007e-21im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -2.1239470101841207e-22 - 5.2735395979082394e-23im
Formula2 = -2.123947010184121e-22 - 5.273539597908247e-23im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -6.193193787691275e-34 - 8.355698131836239e-34im
Formula2 = -6.19319378769127e-34 - 8.355698131836246e-34im
-----------------------------------------------------------------
=================================================================
i = 90
lambda = -37.48110889759637 - 7.5990788742165165im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15918186736415796 + 2.9403219082906598e-5im
Formula2 = 0.15918186736415796 + 2.9403219082906062e-5im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -2.6924272262629703e-5 - 2.9403219082906608e-5im
Formula2 = -2.692427226262964e-5 - 2.9403219082906076e-5im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -1.1577952085078745e-20 + 8.346795819105603e-21im
Formula2 = -1.15779520850787e-20 + 8.346795819105701e-21im
-----------------------------------------------------------------
=================================================================
i = 91
lambda = -8.698118731007163 - 49.239945033277486im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494309189535
Formula2 = 0.15915494309189535 + 1.6940658945086007e-21im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 8.18495689130289e-31 + 2.3523348108750807e-30im
Formula2 = 8.184956891302886e-31 + 2.3523348108750814e-30im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 6.8685351334082155e-37 - 1.93300866383521e-37im
Formula2 = 6.868535133408218e-37 - 1.933008663835206e-37im
-----------------------------------------------------------------
=================================================================
i = 92
lambda = 14.381174523932444 + 14.350773158534707im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 1.7817165614555204e-7 - 5.3062878007312334e-8im
Formula2 = 1.7817165614555082e-7 - 5.306287800731337e-8im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.0015605336488669803 + 0.0004288153115779333im
Formula2 = 0.0015605336488669782 + 0.0004288153115779202im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.1575942312713722 - 0.00042876224869992595im
Formula2 = 0.1575942312713722 - 0.0004287622486999129im
-----------------------------------------------------------------
=================================================================
i = 93
lambda = 49.26635294638922 + 8.197629612745885im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -8.757925877553003e-5 - 4.21533228826114e-6im
Formula2 = -8.757925877552847e-5 - 4.215332288260348e-6im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 4.2230710253387174e-18 + 3.78400741228267e-18im
Formula2 = 4.223071025338664e-18 + 3.784007412282564e-18im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.15924252235067085 + 4.215332288257356e-6im
Formula2 = 0.15924252235067085 + 4.215332288256563e-6im
-----------------------------------------------------------------
=================================================================
i = 94
lambda = 43.55034456536609 - 9.808736235226448im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.1591585153385096 - 2.524787151773805e-6im
Formula2 = 0.1591585153385096 - 2.5247871517738464e-6im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -2.598684988337801e-24 + 7.53598266994986e-25im
Formula2 = -2.5986849883378012e-24 + 7.535982669949846e-25im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -3.5722466142857717e-6 + 2.5247871517738053e-6im
Formula2 = -3.5722466142858374e-6 + 2.5247871517738464e-6im
-----------------------------------------------------------------
=================================================================
i = 95
lambda = -36.065165714506904 + 49.39536357317755im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -9.389187403386583e-23 - 6.209960131079468e-23im
Formula2 = -9.389187403386867e-23 - 6.20996013107943e-23im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.15961634223520443 + 3.2517715864577334e-5im
Formula2 = 0.15961634223520443 + 3.251771586457124e-5im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -0.00046139914330909547 - 3.251771586457719e-5im
Formula2 = -0.0004613991433091024 - 3.251771586457124e-5im
-----------------------------------------------------------------
=================================================================
i = 96
lambda = -49.31242750911482 - 41.27244697460981im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494309189535 + 9.317362419797304e-21im
Formula2 = 0.15915494309189535 + 9.317362419797304e-21im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -9.42902466316046e-20 - 8.90304687224762e-21im
Formula2 = -9.429024663160312e-20 - 8.903046872245369e-21im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -5.071268010413761e-47 - 2.947832135837074e-47im
Formula2 = -5.071268010413765e-47 - 2.947832135837025e-47im
-----------------------------------------------------------------
=================================================================
i = 97
lambda = 28.518263670544044 + 5.815767904165405im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.00026662322212403104 + 0.0009087446341633558im
Formula2 = 0.0002666232221240338 + 0.0009087446341633458im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 9.057773853979863e-11 + 6.13445367193094e-11im
Formula2 = 9.0577738539798e-11 + 6.134453671930845e-11im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.15888831977919357 - 0.0009087446955078926im
Formula2 = 0.15888831977919357 - 0.0009087446955078826im
-----------------------------------------------------------------
=================================================================
i = 98
lambda = 48.12841104751102 + 47.70839848457071im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -2.809046491466915e-22 + 5.383543637438787e-22im
Formula2 = -2.8090464914667553e-22 + 5.383543637438789e-22im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 3.9741857260015333e-10 - 5.754195104304035e-9im
Formula2 = 3.9741857260006374e-10 - 5.754195104303959e-9im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.15915494269447678 + 5.754195104301922e-9im
Formula2 = 0.15915494269447678 + 5.754195104303616e-9im
-----------------------------------------------------------------
=================================================================
i = 99
lambda = 12.976924516881368 - 38.679411304273216im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494309189535 - 1.6940658945086007e-21im
Formula2 = 0.15915494309189535 - 3.3881317890172014e-21im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -1.2142632556790247e-31 - 5.407585034877187e-32im
Formula2 = -1.214263255679025e-31 - 5.407585034877192e-32im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 6.066169118987215e-23 + 7.648380886601777e-22im
Formula2 = 6.066169118987166e-23 + 7.648380886601779e-22im
-----------------------------------------------------------------
=================================================================
i = 100
lambda = 48.1902734234708 - 42.31829771932851im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494309189535 + 2.879912020664621e-20im
Formula2 = 0.15915494309189535 + 2.710505431213761e-20im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 1.5242856614989907e-47 - 2.8465840597494105e-47im
Formula2 = 1.524285661498986e-47 - 2.8465840597493745e-47im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -1.719001536593675e-20 - 2.8497022904747463e-20im
Formula2 = -1.7190015365937336e-20 - 2.8497022904747806e-20im
-----------------------------------------------------------------
=================================================================
Out[182]:
true
In [183]:
test_formula(FMinusFormula, FMinusSymGeneric)
i = 1
lambda = 28.846114079048064 - 33.92605654147365im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 7.05528725653511e-18 + 1.4670182110825103e-16im
Formula2 = 7.055287256535053e-18 + 1.46701821108251e-16im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -4.3984300324225074e-35 + 1.7299411803081882e-34im
Formula2 = -4.3984300324225143e-35 + 1.72994118030819e-34im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -7.05528725653511e-18 - 1.4670182110825103e-16im
Formula2 = -7.055287256535053e-18 - 1.46701821108251e-16im
-----------------------------------------------------------------
=================================================================
i = 2
lambda = -46.77547621552418 + 47.015462657125155im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.15915494309189102 - 2.1667962529206466e-15im
Formula2 = -0.15915494309189535
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.1591549302601083 - 2.940557955643807e-9im
Formula2 = 0.1591549302601126 - 2.9405601224396366e-9im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 1.2831782726055103e-8 + 2.940560122439267e-9im
Formula2 = 1.2831782726055416e-8 + 2.9405601224391515e-9im
-----------------------------------------------------------------
=================================================================
i = 3
lambda = -48.87671139413852 - 14.811668335021096im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 2.7689858036666246e-8 - 9.843975478362437e-9im
Formula2 = 2.7689858036666246e-8 - 9.843975478362448e-9im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -2.7689858036666246e-8 + 9.843975478362437e-9im
Formula2 = -2.7689858036666246e-8 + 9.843975478362448e-9im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 1.0327914852556525e-29 + 1.058150411370658e-29im
Formula2 = 1.0327914852556502e-29 + 1.058150411370649e-29im
-----------------------------------------------------------------
=================================================================
i = 4
lambda = 38.22149705805509 + 28.036389721358958im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.1591549430918973 - 2.148787002620293e-13im
Formula2 = -0.1591549430918956 - 2.1222692047208162e-13im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -1.1112115929650902e-10 + 1.6382823824515891e-9im
Formula2 = -1.1112115929648393e-10 + 1.6382823824515734e-9im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.15915494320301846 - 1.6380675037506465e-9im
Formula2 = 0.15915494320301676 - 1.6380701555350952e-9im
-----------------------------------------------------------------
=================================================================
i = 5
lambda = -1.722563918146669 - 2.5939087129997347im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.0037201957062232118 + 0.0003055502129423549im
Formula2 = -0.0037201957062232144 + 0.00030555021294235535im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.004338765481878219 + 0.00014499798313799564im
Formula2 = 0.004338765481878222 + 0.00014499798313799556im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -0.0006185697756550076 - 0.00045054819608035036im
Formula2 = -0.0006185697756550078 - 0.00045054819608035085im
-----------------------------------------------------------------
=================================================================
i = 6
lambda = 18.9004975776393 + 32.84377264782073im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.1591549430918978 + 4.209054945672388e-16im
Formula2 = -0.15915494309189615 + 2.6525175556447317e-16im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.14069129094919053 - 0.08823863180867816im
Formula2 = 0.14069129094918947 - 0.08823863180867766im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.018463652142707315 + 0.08823863180867769im
Formula2 = 0.01846365214270669 + 0.08823863180867739im
-----------------------------------------------------------------
=================================================================
i = 7
lambda = -12.544581881849567 - 16.927787557367594im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 1.758752042309036e-9 + 2.8951823309762578e-9im
Formula2 = 1.7587520423090333e-9 + 2.895182330976253e-9im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -1.7587520561439222e-9 - 2.8951823552939764e-9im
Formula2 = -1.7587520561439196e-9 - 2.8951823552939723e-9im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 1.3834886239839055e-17 + 2.4317719000447903e-17im
Formula2 = 1.383488623983903e-17 + 2.431771900044779e-17im
-----------------------------------------------------------------
=================================================================
i = 8
lambda = 13.600782446614886 - 15.669501946755716im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -5.987293794767104e-9 - 1.0815248862809385e-8im
Formula2 = -5.9872937947670986e-9 - 1.0815248862809385e-8im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -6.383346852457985e-17 + 3.933613961964647e-17im
Formula2 = -6.38334685245802e-17 + 3.9336139619646506e-17im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 5.987293858600573e-9 + 1.0815248823473245e-8im
Formula2 = 5.987293858600567e-9 + 1.0815248823473246e-8im
-----------------------------------------------------------------
=================================================================
i = 9
lambda = 12.128083484309386 - 4.231699973561717im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.0009510889432113857 - 0.0006692796749290561im
Formula2 = 0.000951088943211386 - 0.0006692796749290556im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 2.9575008332926155e-9 + 7.104710277514049e-9im
Formula2 = 2.9575008332926064e-9 + 7.104710277514024e-9im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -0.000951091900712219 + 0.0006692725702187785im
Formula2 = -0.0009510919007122193 + 0.0006692725702187782im
-----------------------------------------------------------------
=================================================================
i = 10
lambda = 22.994910031243435 - 41.984476528449036im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 2.909865431080862e-20 - 8.787817992760344e-22im
Formula2 = 2.909865431080811e-20 - 8.787817992758729e-22im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -8.672514836686891e-38 - 2.1407870852275523e-37im
Formula2 = -8.672514836686633e-38 - 2.1407870852275164e-37im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -2.909865431080862e-20 + 8.787817992760346e-22im
Formula2 = -2.909865431080811e-20 + 8.787817992758733e-22im
-----------------------------------------------------------------
=================================================================
i = 11
lambda = 24.09008329826696 + 20.78018384398858im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.1591549433926081 - 1.3727029495730347e-12im
Formula2 = -0.1591549433926066 - 1.3706009390586013e-12im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -6.775570934179706e-6 + 5.938550500269855e-6im
Formula2 = -6.775570934179594e-6 + 5.938550500269888e-6im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.15916171896354228 - 5.938549127566904e-6im
Formula2 = 0.15916171896354078 - 5.93854912966895e-6im
-----------------------------------------------------------------
=================================================================
i = 12
lambda = 34.52780870670932 - 37.95621003459606im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -1.371520521517783e-18 + 2.2204473517691614e-18im
Formula2 = -1.3715205215177837e-18 + 2.2204473517691606e-18im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -3.0775485835186065e-39 + 2.1920386967494763e-40im
Formula2 = -3.0775485835185915e-39 + 2.19203869674966e-40im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 1.371520521517783e-18 - 2.2204473517691614e-18im
Formula2 = 1.3715205215177837e-18 - 2.2204473517691606e-18im
-----------------------------------------------------------------
=================================================================
i = 13
lambda = 11.656474468553554 - 3.751669020338987im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.001871929721864874 - 0.00026192650048853554im
Formula2 = 0.001871929721864874 - 0.00026192650048853484im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 2.3944868708056722e-9 + 2.3801899655054628e-8im
Formula2 = 2.394486870805682e-9 + 2.3801899655054668e-8im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -0.0018719321163517448 + 0.0002619026985888805im
Formula2 = -0.0018719321163517448 + 0.0002619026985888798im
-----------------------------------------------------------------
=================================================================
i = 14
lambda = 40.78591820035025 + 18.63362816186583im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.15915494168554128 + 2.154137057686995e-9im
Formula2 = -0.15915494168553895 + 2.1541377965689755e-9im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -9.73468582183323e-13 + 1.2929477066702596e-12im
Formula2 = -9.734685821832811e-13 + 1.2929477066702624e-12im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.15915494168651476 - 2.1554300053937535e-9im
Formula2 = 0.15915494168651242 - 2.1554307442752047e-9im
-----------------------------------------------------------------
=================================================================
i = 15
lambda = -42.61946556143703 - 32.37576123785906im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 6.579204414685454e-16 - 2.1484454338939553e-16im
Formula2 = 6.57920441468543e-16 - 2.1484454338939504e-16im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -6.579204414685454e-16 + 2.1484454338939553e-16im
Formula2 = -6.57920441468543e-16 + 2.1484454338939504e-16im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 2.8352464817871657e-39 + 1.1720319927028509e-38im
Formula2 = 2.8352464817871833e-39 + 1.1720319927028461e-38im
-----------------------------------------------------------------
=================================================================
i = 16
lambda = -30.797504255030404 + 9.222904191540216im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.15918353522130088 + 1.3073431478696686e-5im
Formula2 = -0.15918353522130266 + 1.3073431478834333e-5im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.15918353529993726 - 1.3073402988476136e-5im
Formula2 = 0.15918353529993903 - 1.3073402988613784e-5im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -7.863636270944477e-11 - 2.8490220550185372e-11im
Formula2 = -7.863636270944601e-11 - 2.8490220550185857e-11im
-----------------------------------------------------------------
=================================================================
i = 17
lambda = -8.312709893909172 + 33.9060681989742im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.15915494309189535 - 4.658681209898652e-20im
Formula2 = -0.15915494309189535
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.07957981975925911 - 0.1378282448744774im
Formula2 = 0.07957981975925917 - 0.1378282448744774im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.07957512333263625 + 0.13782824487447734im
Formula2 = 0.07957512333263617 + 0.1378282448744774im
-----------------------------------------------------------------
=================================================================
i = 18
lambda = -41.32845155100853 - 33.11944100966953im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -1.1792791954835815e-17 - 3.287914334194499e-16im
Formula2 = -1.1792791954834774e-17 - 3.2879143341944993e-16im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 1.1792791954835815e-17 + 3.287914334194499e-16im
Formula2 = 1.1792791954834774e-17 + 3.2879143341944993e-16im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 3.844947586045123e-39 - 1.1461190308861329e-38im
Formula2 = 3.844947586045092e-39 - 1.1461190308861335e-38im
-----------------------------------------------------------------
=================================================================
i = 19
lambda = -6.02553060398585 + 8.598961942200823im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.15915046825066292 + 6.32574816637427e-5im
Formula2 = -0.15915046825066279 + 6.32574816644298e-5im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.24829000384926922 - 0.10447643330110751im
Formula2 = 0.24829000384926864 - 0.10447643330110856im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -0.08913953559860625 + 0.10441317581944376im
Formula2 = -0.08913953559860584 + 0.10441317581944413im
-----------------------------------------------------------------
=================================================================
i = 20
lambda = 49.912202474146156 - 37.80755685612414im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 2.327876459231733e-18 - 1.936662012272015e-18im
Formula2 = 2.3278764592317336e-18 - 1.936662012272014e-18im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 1.7766903624543134e-45 - 6.053035475091425e-45im
Formula2 = 1.7766903624543025e-45 - 6.053035475091401e-45im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -2.327876459231733e-18 + 1.936662012272015e-18im
Formula2 = -2.3278764592317336e-18 + 1.936662012272014e-18im
-----------------------------------------------------------------
=================================================================
i = 21
lambda = 31.33516733747686 + 6.737940407449173im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.1593689760220729 - 0.0003112421730896737im
Formula2 = -0.1593689760220714 - 0.0003112421730885392im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -5.053155252764619e-13 - 1.5165171805631425e-11im
Formula2 = -5.053155252765697e-13 - 1.5165171805631235e-11im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.1593689760225782 + 0.0003112421882548455im
Formula2 = 0.1593689760225767 + 0.000311242188253711im
-----------------------------------------------------------------
=================================================================
i = 22
lambda = 22.670262103466428 + 49.33508091388728im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.15915494309189532 - 1.6347735882007997e-19im
Formula2 = -0.15915494309189535
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.07916501283064632 - 0.1381459464938717im
Formula2 = 0.07916501283064639 - 0.13814594649387174im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.07998993026124901 + 0.13814594649387163im
Formula2 = 0.07998993026124894 + 0.13814594649387174im
-----------------------------------------------------------------
=================================================================
i = 23
lambda = -23.056192407323906 + 28.14635074418635im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.1591549430919925 - 1.6470631977028418e-13im
Formula2 = -0.15915494309199432 - 1.6322067395574402e-13im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.1599976068701654 + 0.0002561204069314583im
Formula2 = 0.15999760687016726 + 0.0002561204069299702im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -0.0008426637781729062 - 0.00025612040676675166im
Formula2 = -0.0008426637781729199 - 0.00025612040676674955im
-----------------------------------------------------------------
=================================================================
i = 24
lambda = -46.64023888870283 - 17.35198416942569im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -1.9586816920414226e-9 - 1.237693414471832e-9im
Formula2 = -1.95868169204143e-9 - 1.2376934144718358e-9im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 1.9586816920414226e-9 + 1.237693414471832e-9im
Formula2 = 1.95868169204143e-9 + 1.2376934144718358e-9im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 1.0162821935994828e-31 + 2.268378208089793e-30im
Formula2 = 1.0162821935995592e-31 + 2.26837820808979e-30im
-----------------------------------------------------------------
=================================================================
i = 25
lambda = 48.45235094493469 + 48.296329495816906im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.159154943091898 - 3.3053309302913045e-15im
Formula2 = -0.15915494309189535
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -3.3113159346701236e-9 - 4.8176008315153115e-9im
Formula2 = -3.311315934670181e-9 - 4.817600831515172e-9im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.15915494640321395 + 4.817604136845429e-9im
Formula2 = 0.15915494640321126 + 4.81760083151344e-9im
-----------------------------------------------------------------
=================================================================
i = 26
lambda = -13.151955206883478 + 6.052964129021277im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.15910517885899242 + 0.0007467611510279612im
Formula2 = -0.15910517885899317 + 0.0007467611510280759im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.15912205840636257 - 0.0006744520655502655im
Formula2 = 0.15912205840636331 - 0.0006744520655503799im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -1.6879547370131445e-5 - 7.23090854776956e-5im
Formula2 = -1.687954737013165e-5 - 7.230908547769602e-5im
-----------------------------------------------------------------
=================================================================
i = 27
lambda = -44.41656692440892 - 12.686233263515703im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 2.1960203553147274e-8 + 2.4518510345686825e-7im
Formula2 = 2.1960203553148243e-8 + 2.451851034568682e-7im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -2.1960203553147274e-8 - 2.4518510345686825e-7im
Formula2 = -2.1960203553148243e-8 - 2.451851034568682e-7im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -1.0464466130242064e-26 + 1.3472735085308746e-26im
Formula2 = -1.0464466130242072e-26 + 1.3472735085308823e-26im
-----------------------------------------------------------------
=================================================================
i = 28
lambda = 28.152862078674204 + 38.64843307845645im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.15915494309189637 - 2.3055694723175812e-15im
Formula2 = -0.15915494309189535 + 4.208059681959364e-18im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -0.0016268612399371986 - 0.0012031493925261704im
Formula2 = -0.0016268612399372025 - 0.0012031493925261183im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.16078180433183356 + 0.0012031493925284756im
Formula2 = 0.16078180433183253 + 0.001203149392526114im
-----------------------------------------------------------------
=================================================================
i = 29
lambda = 34.05490179096462 - 11.063891531294992im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -1.066454936647881e-6 + 6.45916705013789e-7im
Formula2 = -1.066454936647881e-6 + 6.459167050137885e-7im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 1.2121528996718973e-21 - 9.408219184516917e-22im
Formula2 = 1.212152899671893e-21 - 9.408219184516889e-22im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 1.0664549366478797e-6 - 6.459167050137881e-7im
Formula2 = 1.06645493664788e-6 - 6.459167050137875e-7im
-----------------------------------------------------------------
=================================================================
i = 30
lambda = 47.87477680593666 - 20.644064394539853im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 1.9409667384147694e-11 + 8.39210937594027e-11im
Formula2 = 1.940966738414766e-11 + 8.392109375940268e-11im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 4.830074846003964e-33 - 2.8093375630641114e-33im
Formula2 = 4.830074846003985e-33 - 2.8093375630640546e-33im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -1.9409667384147694e-11 - 8.39210937594027e-11im
Formula2 = -1.940966738414766e-11 - 8.392109375940268e-11im
-----------------------------------------------------------------
=================================================================
i = 31
lambda = 10.99097082732765 + 21.95006626092524im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.15915494307976077 - 6.79011262204385e-13im
Formula2 = -0.15915494307976075 - 6.792042107775856e-13im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.09696963456768493 - 0.1491009041212903im
Formula2 = 0.0969696345676852 - 0.1491009041212901im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.06218530851207587 + 0.14910090412196922im
Formula2 = 0.06218530851207555 + 0.1491009041219693im
-----------------------------------------------------------------
=================================================================
i = 32
lambda = -41.29986485354262 - 3.378179922242495im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.00022053109668114512 - 0.0027019920583254025im
Formula2 = -0.00022053109668114553 - 0.0027019920583254025im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.00022053109668114488 + 0.0027019920583254025im
Formula2 = 0.00022053109668114531 + 0.002701992058325403im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 2.2749131391339867e-19 - 1.8511454137270798e-19im
Formula2 = 2.2749131391339824e-19 - 1.851145413727085e-19im
-----------------------------------------------------------------
=================================================================
i = 33
lambda = -34.739484303848585 + 4.251404558129423im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.15753889815271557 - 0.004188686977928222im
Formula2 = -0.15753889815271724 - 0.004188686977928636im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.15753889815262942 + 0.004188686977718285im
Formula2 = 0.15753889815263108 + 0.0041886869777187im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 8.614865196706284e-14 + 2.0993677851994827e-13im
Formula2 = 8.614865196706366e-14 + 2.0993677851995067e-13im
-----------------------------------------------------------------
=================================================================
i = 34
lambda = -36.437102071937865 - 49.757897526144944im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 1.9115357121416792e-23 - 4.164791874063667e-24im
Formula2 = 1.9115357121416778e-23 - 4.164791874063743e-24im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -1.9115357121416792e-23 + 4.164791874063667e-24im
Formula2 = -1.9115357121416778e-23 + 4.164791874063743e-24im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -6.518539277318283e-48 + 1.0211714183624782e-47im
Formula2 = -6.518539277318231e-48 + 1.0211714183624912e-47im
-----------------------------------------------------------------
=================================================================
i = 35
lambda = 24.38379182064378 + 6.916966480880319im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.159456928614828 - 9.302858469724947e-5im
Formula2 = -0.1594569286148267 - 9.30285846961899e-5im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -9.832623548752417e-10 + 6.763045196808592e-9im
Formula2 = -9.832623548752072e-10 + 6.763045196808542e-9im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.15945692959809032 + 9.302182165205266e-5im
Formula2 = 0.15945692959808905 + 9.30218216509931e-5im
-----------------------------------------------------------------
=================================================================
i = 36
lambda = -36.32799617317972 - 1.5365423800697755im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.017814250992601116 - 0.006746491493992377im
Formula2 = 0.017814250992601085 - 0.00674649149399237im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -0.017814250992601484 + 0.006746491493992484im
Formula2 = -0.017814250992601453 + 0.006746491493992477im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 3.6828351985161294e-16 - 1.0744617068233291e-16im
Formula2 = 3.682835198516106e-16 - 1.0744617068233399e-16im
-----------------------------------------------------------------
=================================================================
i = 37
lambda = 2.4091768866591394 - 0.6877547454189568im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.031082606379799628 + 0.003284567838677595im
Formula2 = -0.03108260637979962 + 0.0032845678386775805im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.005404684798628282 + 0.0004959844770957529im
Formula2 = 0.005404684798628284 + 0.0004959844770957537im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.02567792158117135 - 0.003780552315773348im
Formula2 = 0.025677921581171336 - 0.003780552315773334im
-----------------------------------------------------------------
=================================================================
i = 38
lambda = -16.167032790151858 - 9.008723863601588im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -6.280178195435706e-7 - 9.714898473637655e-6im
Formula2 = -6.280178195435744e-7 - 9.714898473637656e-6im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 6.280176875316185e-7 + 9.71489835291243e-6im
Formula2 = 6.280176875316223e-7 + 9.71489835291243e-6im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 1.320119521574245e-13 + 1.207252244556988e-13im
Formula2 = 1.320119521574246e-13 + 1.2072522445569855e-13im
-----------------------------------------------------------------
=================================================================
i = 39
lambda = 34.08119694616754 + 1.5369717237241574im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.11355857868419314 + 0.019377921853882728im
Formula2 = -0.11355857868419188 + 0.019377921853882697im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 1.6086671856639835e-14 + 7.376704404268326e-14im
Formula2 = 1.608667185663948e-14 + 7.376704404268265e-14im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.11355857868417706 - 0.019377921853956495im
Formula2 = 0.11355857868417579 - 0.019377921853956464im
-----------------------------------------------------------------
=================================================================
i = 40
lambda = 20.557821239196585 - 37.0213254144478im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -6.911146163817883e-18 + 8.889949348298164e-18im
Formula2 = -6.9111461638175465e-18 + 8.889949348298e-18im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -4.3551603574123754e-33 - 3.556948441448555e-33im
Formula2 = -4.355160357412297e-33 - 3.556948441448373e-33im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 6.911146163817888e-18 - 8.889949348298161e-18im
Formula2 = 6.911146163817551e-18 - 8.889949348297995e-18im
-----------------------------------------------------------------
=================================================================
i = 41
lambda = 30.380046235230623 + 35.74814454725643im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.1591549430918967 - 2.488358335302112e-15im
Formula2 = -0.15915494309189543 - 1.0770023924338429e-18im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 3.0118356607057054e-5 - 6.21120281804256e-5im
Formula2 = 3.0118356607055722e-5 - 6.211202818042516e-5im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.15912482473528966 + 6.211202818291393e-5im
Formula2 = 0.15912482473528838 + 6.211202818042625e-5im
-----------------------------------------------------------------
=================================================================
i = 42
lambda = -48.30960979941867 - 23.692252123127886im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 2.5124847283913594e-12 - 3.2231614047413057e-12im
Formula2 = 2.5124847283913586e-12 - 3.223161404741307e-12im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -2.5124847283913594e-12 + 3.2231614047413057e-12im
Formula2 = -2.5124847283913586e-12 + 3.223161404741307e-12im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 4.3516800551593995e-36 - 3.9385262390262377e-35im
Formula2 = 4.351680055159058e-36 - 3.9385262390262393e-35im
-----------------------------------------------------------------
=================================================================
i = 43
lambda = 34.42305546755502 + 33.33302027157501im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.1591549430918961 - 1.8934157339196107e-15im
Formula2 = -0.15915494309189468 + 8.409614150883815e-16im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 3.101471774793079e-7 - 5.397776947352924e-7im
Formula2 = 3.101471774792957e-7 - 5.397776947352894e-7im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.1591546329447186 + 5.397776966287077e-7im
Formula2 = 0.1591546329447172 + 5.397776938943285e-7im
-----------------------------------------------------------------
=================================================================
i = 44
lambda = 12.241105035369145 - 0.49027398110632703im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.03415085359378949 - 0.050789199155874584im
Formula2 = 0.03415085359378951 - 0.050789199155874674im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -1.889984436602316e-6 - 1.4534452320862043e-6im
Formula2 = -1.8899844366023183e-6 - 1.453445232086208e-6im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -0.03414896360935289 + 0.05079065260110667im
Formula2 = -0.034148963609352906 + 0.05079065260110676im
-----------------------------------------------------------------
=================================================================
i = 45
lambda = 11.10619624496605 - 3.8799469475381727im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.0015166322454276424 + 0.000671906538869751im
Formula2 = 0.0015166322454276421 + 0.0006719065388697517im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -2.3655965202739628e-8 + 2.112079770430947e-8im
Formula2 = -2.3655965202739648e-8 + 2.11207977043095e-8im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -0.0015166085894624396 - 0.0006719276596674553im
Formula2 = -0.0015166085894624394 - 0.000671927659667456im
-----------------------------------------------------------------
=================================================================
i = 46
lambda = -48.22347096112336 + 39.93239337066876im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.1591549430918912 - 1.7547990038596813e-15im
Formula2 = -0.15915494309189535 - 1.213434253945889e-18im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.1591549430423676 - 9.690127912222681e-11im
Formula2 = 0.15915494304237174 - 9.690303270728687e-11im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 4.9523589498038814e-11 + 9.690303392072407e-11im
Formula2 = 4.9523589498040857e-11 + 9.690303392072476e-11im
-----------------------------------------------------------------
=================================================================
i = 47
lambda = -15.81911650299628 - 36.54046219228373im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -1.3148130287560348e-19 - 1.7417364577411538e-19im
Formula2 = -1.3148130287560083e-19 - 1.7417364577411757e-19im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 1.3148130287583172e-19 + 1.7417364577395892e-19im
Formula2 = 1.314813028758291e-19 + 1.7417364577396113e-19im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -2.282607350689655e-31 + 1.5645054326610664e-31im
Formula2 = -2.2826073506896816e-31 + 1.5645054326610307e-31im
-----------------------------------------------------------------
=================================================================
i = 48
lambda = 8.632102003781597 + 37.2721957522938im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.15915494309189535 + 2.202285662861181e-20im
Formula2 = -0.15915494309189535
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.07957798059528268 - 0.13783323497744174im
Formula2 = 0.07957798059528275 - 0.13783323497744174im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.07957696249661267 + 0.13783323497744168im
Formula2 = 0.07957696249661259 + 0.13783323497744174im
-----------------------------------------------------------------
=================================================================
i = 49
lambda = -2.89278631860779 + 27.1321005552183im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.15915494309189535 + 4.135214848495494e-18im
Formula2 = -0.15915494309189535 + 4.125050453128443e-18im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.07957623489685835 - 0.1378324596324546im
Formula2 = 0.0795762348968584 - 0.13783245963245463im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.07957870819503701 + 0.13783245963245455im
Formula2 = 0.07957870819503693 + 0.1378324596324546im
-----------------------------------------------------------------
=================================================================
i = 50
lambda = 32.01795137835626 + 20.02473787361869im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.15915494304175123 - 6.380897253778806e-10im
Formula2 = -0.15915494304174982 - 6.380871257007813e-10im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 4.06456581882057e-9 - 4.995429699013231e-9im
Formula2 = 4.064565818820504e-9 - 4.995429699013226e-9im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.1591549389771854 + 5.6335194243916025e-9im
Formula2 = 0.159154938977184 + 5.633516824712386e-9im
-----------------------------------------------------------------
=================================================================
i = 51
lambda = -19.204720127643537 - 21.4208376775602im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 6.593566502886919e-12 + 3.9028109327157894e-11im
Formula2 = 6.5935665028869926e-12 + 3.9028109327157817e-11im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -6.593566502958129e-12 - 3.902810932723616e-11im
Formula2 = -6.593566502958203e-12 - 3.9028109327236076e-11im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 7.121052746289021e-23 + 7.826297509414822e-23im
Formula2 = 7.121052746289048e-23 + 7.826297509414812e-23im
-----------------------------------------------------------------
=================================================================
i = 52
lambda = -47.122055386040486 + 26.196298746096147im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.15915494309122133 - 1.1568909368962208e-12im
Formula2 = -0.159154943091225 - 1.156143733402554e-12im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.15915494309111983 + 8.810562219372015e-13im
Formula2 = 0.1591549430911235 + 8.803090211401436e-13im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 1.0150201682211831e-13 + 2.758347143162983e-13im
Formula2 = 1.0150201682212159e-13 + 2.7583471431630146e-13im
-----------------------------------------------------------------
=================================================================
i = 53
lambda = 32.3020626493952 - 36.07702516326703im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -6.061200268456691e-18 - 1.597873126604992e-17im
Formula2 = -6.061200268456684e-18 - 1.5978731266049924e-17im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 2.4592851490279075e-38 - 3.54466278816992e-37im
Formula2 = 2.459285149027811e-38 - 3.5446627881699367e-37im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 6.061200268456691e-18 + 1.597873126604992e-17im
Formula2 = 6.061200268456684e-18 + 1.5978731266049924e-17im
-----------------------------------------------------------------
=================================================================
i = 54
lambda = 21.532867258490924 - 35.29091071248473im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -2.6345533779330008e-17 + 2.5501808918900296e-17im
Formula2 = -2.6345533779329888e-17 + 2.5501808918900247e-17im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 3.969344200841605e-33 + 1.4235982228018412e-32im
Formula2 = 3.969344200841668e-33 + 1.4235982228018335e-32im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 2.6345533779330005e-17 - 2.5501808918900308e-17im
Formula2 = 2.634553377932988e-17 - 2.5501808918900262e-17im
-----------------------------------------------------------------
=================================================================
i = 55
lambda = -16.56829786915368 - 12.886474439019956im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 6.653968361474427e-8 - 1.901890788076544e-7im
Formula2 = 6.653968361474415e-8 - 1.9018907880765425e-7im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -6.653968345285391e-8 + 1.9018907914727677e-7im
Formula2 = -6.653968345285379e-8 + 1.9018907914727664e-7im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -1.6189036136907985e-16 - 3.396223755896341e-16im
Formula2 = -1.6189036136907965e-16 - 3.396223755896343e-16im
-----------------------------------------------------------------
=================================================================
i = 56
lambda = 42.89210278274102 - 39.496406141122534im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 5.588784068188381e-19 + 2.404481261376616e-20im
Formula2 = 5.58878406818838e-19 + 2.4044812613766373e-20im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -6.217689672268914e-44 - 2.0978739020091097e-43im
Formula2 = -6.217689672268967e-44 - 2.0978739020091105e-43im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -5.588784068188381e-19 - 2.404481261376616e-20im
Formula2 = -5.58878406818838e-19 - 2.4044812613766373e-20im
-----------------------------------------------------------------
=================================================================
i = 57
lambda = -8.127640528011135 + 2.829132007733584im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.14270025053628282 + 0.0038515580797078694im
Formula2 = -0.14270025053628335 + 0.003851558079707908im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.1420082295946681 - 0.003085064595429753im
Formula2 = 0.14200822959466863 - 0.0030850645954297895im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.0006920209416147239 - 0.0007664934842781161im
Formula2 = 0.0006920209416147264 - 0.0007664934842781183im
-----------------------------------------------------------------
=================================================================
i = 58
lambda = 8.464216894654328 + 9.499881652366952im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.1591290420138139 - 1.2160677391171778e-6im
Formula2 = -0.15912904201381348 - 1.2160677382452666e-6im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.013715167415383483 + 0.022368489353741552im
Formula2 = 0.013715167415383539 + 0.02236848935374144im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.14541387459843041 - 0.022367273286002427im
Formula2 = 0.14541387459842994 - 0.022367273286003197im
-----------------------------------------------------------------
=================================================================
i = 59
lambda = -40.44551402448464 - 10.538613919080888im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -1.6757958763869261e-6 - 1.2792414268817434e-6im
Formula2 = -1.6757958763869329e-6 - 1.2792414268817474e-6im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 1.6757958763869261e-6 + 1.2792414268817434e-6im
Formula2 = 1.6757958763869329e-6 + 1.2792414268817474e-6im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -3.869608088923344e-24 - 1.2747262808896105e-23im
Formula2 = -3.8696080889234555e-24 - 1.274726280889613e-23im
-----------------------------------------------------------------
=================================================================
i = 60
lambda = 10.282495172011565 - 45.11062054942796im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -4.807749818562185e-27 + 1.751550850219313e-28im
Formula2 = -4.807749818562154e-27 + 1.7515508502184417e-28im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 7.289713720627426e-35 + 5.039267297197284e-35im
Formula2 = 7.289713720627286e-35 + 5.039267297197376e-35im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 4.807749745665048e-27 - 1.7515513541460428e-28im
Formula2 = 4.807749745665017e-27 - 1.7515513541451713e-28im
-----------------------------------------------------------------
=================================================================
i = 61
lambda = -44.452095848132146 + 40.58127122569604im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.1591549430918933 - 1.4492098452810638e-15im
Formula2 = -0.15915494309189535 + 7.521652571618187e-19im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.15915493924638655 + 8.817846972566159e-10im
Formula2 = 0.1591549392463886 + 8.817832472937583e-10im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 3.8455067428300895e-9 - 8.817832480468439e-10im
Formula2 = 3.845506742830132e-9 - 8.817832480469095e-10im
-----------------------------------------------------------------
=================================================================
i = 62
lambda = 2.8959827646028558 - 28.23364863420299im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -6.791804566000219e-19 - 3.9662839352631404e-19im
Formula2 = -6.791804566000168e-19 - 3.9662839352632064e-19im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -5.1327508086478456e-21 - 1.0957467856401442e-21im
Formula2 = -5.1327508086478275e-21 - 1.0957467856401948e-21im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 6.843132074086698e-19 + 3.977241403119542e-19im
Formula2 = 6.843132074086647e-19 + 3.9772414031196084e-19im
-----------------------------------------------------------------
=================================================================
i = 63
lambda = -13.864108788603893 + 12.584645568059713im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.15915417619376596 + 7.846515102149329e-7im
Formula2 = -0.1591541761937671 + 7.846515106220406e-7im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.1596563014664604 + 0.0009291578559213687im
Formula2 = 0.15965630146646154 + 0.0009291578559209645im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -0.000502125272694443 - 0.0009299425074315833im
Formula2 = -0.0005021252726944486 - 0.0009299425074315866im
-----------------------------------------------------------------
=================================================================
i = 64
lambda = 24.079815461261006 - 15.32595597898765im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 1.7571348067567465e-8 + 1.0066904395477218e-10im
Formula2 = 1.757134806756746e-8 + 1.0066904395477893e-10im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 9.50139403837042e-21 - 1.0945465814433683e-20im
Formula2 = 9.501394038370381e-21 - 1.0945465814433726e-20im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -1.7571348067576968e-8 - 1.0066904394382672e-10im
Formula2 = -1.7571348067576964e-8 - 1.0066904394383347e-10im
-----------------------------------------------------------------
=================================================================
i = 65
lambda = -47.83242562884935 - 22.496257299313662im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 2.485050511102001e-12 - 1.3283734746233972e-11im
Formula2 = 2.4850505111020435e-12 - 1.3283734746233965e-11im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -2.485050511102001e-12 + 1.3283734746233972e-11im
Formula2 = -2.4850505111020435e-12 + 1.3283734746233965e-11im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 1.5017325642367593e-34 - 3.2741984878323293e-34im
Formula2 = 1.5017325642367411e-34 - 3.2741984878323464e-34im
-----------------------------------------------------------------
=================================================================
i = 66
lambda = -47.92287717858563 + 47.20815343091441im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.15915494309189082 - 2.20842495766288e-15im
Formula2 = -0.15915494309189535 - 8.470329472543003e-22im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.15915494003983435 - 4.414147090656751e-9im
Formula2 = 0.15915494003983888 - 4.4141492990812855e-9im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 3.052056465805748e-9 + 4.414149299082273e-9im
Formula2 = 3.052056465805852e-9 + 4.414149299082293e-9im
-----------------------------------------------------------------
=================================================================
i = 67
lambda = 22.908411983045724 - 35.46243456491682im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 1.39937248779519e-17 + 2.989312069837119e-17im
Formula2 = 1.3993724877951923e-17 + 2.9893120698371185e-17im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 2.846769676643872e-33 - 1.5398158003342886e-33im
Formula2 = 2.8467696766438915e-33 - 1.539815800334302e-33im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -1.3993724877951904e-17 - 2.989312069837119e-17im
Formula2 = -1.3993724877951926e-17 - 2.989312069837118e-17im
-----------------------------------------------------------------
=================================================================
i = 68
lambda = -32.601763664391605 - 0.26982220469322726im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.03749015067270511 + 0.029665041801573925im
Formula2 = -0.037490150672705176 + 0.029665041801574123im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.03749015067271479 - 0.029665041801618604im
Formula2 = 0.03749015067271486 - 0.029665041801618802im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -9.684251532115289e-15 + 4.4679854794491725e-14im
Formula2 = -9.684251532115122e-15 + 4.4679854794491807e-14im
-----------------------------------------------------------------
=================================================================
i = 69
lambda = -20.62627408193851 - 37.485865272048734im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 7.018247625667528e-18 - 1.3851785315423696e-17im
Formula2 = 7.01824762566896e-18 - 1.3851785315424161e-17im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -7.018247625667523e-18 + 1.3851785315423694e-17im
Formula2 = -7.018247625668956e-18 + 1.385178531542416e-17im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -4.780099577978558e-33 + 1.3204894270669977e-33im
Formula2 = -4.780099577979006e-33 + 1.3204894270667633e-33im
-----------------------------------------------------------------
=================================================================
i = 70
lambda = 32.004537127072126 + 28.285738072835542im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.15915494309188624 - 1.6804705244260598e-13im
Formula2 = -0.1591549430918846 - 1.6504062249874177e-13im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -7.309297027729016e-8 - 3.9866835438510424e-7im
Formula2 = -7.309297027729547e-8 - 3.9866835438510037e-7im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.15915501618485653 + 3.9866852243215626e-7im
Formula2 = 0.15915501618485486 + 3.9866851942572547e-7im
-----------------------------------------------------------------
=================================================================
i = 71
lambda = -42.986593800058785 + 23.87356637175091im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.1591549431055112 + 7.006837940263556e-13im
Formula2 = -0.15915494310551342 + 7.018727216583738e-13im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.1591549431086875 + 2.144332689284743e-13im
Formula2 = 0.15915494310868974 + 2.132443425670056e-13im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -3.1763166554561908e-12 - 9.151170633633108e-13im
Formula2 = -3.1763166554562708e-12 - 9.151170633632863e-13im
-----------------------------------------------------------------
=================================================================
i = 72
lambda = 4.294128908635763 - 8.298688085691872im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 1.0858048732015519e-5 + 6.388556711130678e-6im
Formula2 = 1.0858048732015495e-5 + 6.3885567111306806e-6im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -1.628485033634319e-8 - 4.961819561213191e-9im
Formula2 = -1.6284850336343163e-8 - 4.961819561213198e-9im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -1.0841763881679175e-5 - 6.383594891569464e-6im
Formula2 = -1.0841763881679152e-5 - 6.383594891569467e-6im
-----------------------------------------------------------------
=================================================================
i = 73
lambda = -22.537142042294445 - 1.7074270787800003im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.0009810937052999805 - 0.014366541977174853im
Formula2 = -0.0009810937052999753 - 0.014366541977174851im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.0009810937332164892 + 0.014366542007125305im
Formula2 = 0.0009810937332164842 + 0.014366542007125302im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -2.79165087885186e-11 - 2.9950451022283806e-11im
Formula2 = -2.791650878851867e-11 - 2.995045102228371e-11im
-----------------------------------------------------------------
=================================================================
i = 74
lambda = -28.361374454716714 - 33.605863466361654im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -8.555842314079793e-17 - 1.833375218314414e-16im
Formula2 = -8.555842314079863e-17 - 1.833375218314419e-16im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 8.555842314079793e-17 + 1.833375218314414e-16im
Formula2 = 8.555842314079863e-17 + 1.833375218314419e-16im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -2.8249711832827373e-34 - 3.3617828647402594e-34im
Formula2 = -2.82497118328276e-34 - 3.361782864740266e-34im
-----------------------------------------------------------------
=================================================================
i = 75
lambda = -27.690125051148364 - 40.215073108528365im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -2.454569953042073e-19 - 1.242015212831771e-19im
Formula2 = -2.454569953042074e-19 - 1.2420152128317698e-19im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 2.454569953042073e-19 + 1.242015212831771e-19im
Formula2 = 2.454569953042074e-19 + 1.2420152128317698e-19im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -3.581458746172034e-38 - 1.5984410751821242e-38im
Formula2 = -3.5814587461720375e-38 - 1.598441075182109e-38im
-----------------------------------------------------------------
=================================================================
i = 76
lambda = -22.820241846186164 + 25.67839815476269im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.15915494309256736 - 2.135946865748249e-12im
Formula2 = -0.15915494309256928 - 2.134969154251958e-12im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.15903725216829492 - 0.00028966598913275556im
Formula2 = 0.15903725216829684 - 0.000289665989133735im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.00011769092427242884 + 0.0002896659912687023im
Formula2 = 0.00011769092427243304 + 0.00028966599126870415im
-----------------------------------------------------------------
=================================================================
i = 77
lambda = -11.18167137230077 - 13.273375655843992im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 1.3218188067380664e-7 - 4.4041543118440744e-8im
Formula2 = 1.3218188067380656e-7 - 4.404154311844067e-8im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -1.321818685679286e-7 + 4.404152371093485e-8im
Formula2 = -1.321818685679285e-7 + 4.404152371093477e-8im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -1.2105878034893638e-14 + 1.940750589441543e-14im
Formula2 = -1.2105878034893649e-14 + 1.9407505894415405e-14im
-----------------------------------------------------------------
=================================================================
i = 78
lambda = -18.17409403203818 - 36.70928038127084im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 2.872102568295012e-19 + 1.2005222399307934e-18im
Formula2 = 2.8721025682948293e-19 + 1.2005222399308018e-18im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -2.8721025682952824e-19 - 1.20052223993078e-18im
Formula2 = -2.8721025682951e-19 - 1.2005222399307886e-18im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 2.708846352755882e-32 - 1.3317355728447877e-32im
Formula2 = 2.708846352755913e-32 - 1.3317355728447508e-32im
-----------------------------------------------------------------
=================================================================
i = 79
lambda = 4.218675130694336 + 25.88921042531915im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.15915494309189526 - 4.5315415645157814e-17im
Formula2 = -0.15915494309189526 - 4.5380637182096395e-17im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.07958351827183541 - 0.13783637986068462im
Formula2 = 0.07958351827183546 - 0.13783637986068464im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.07957142482005988 + 0.13783637986068462im
Formula2 = 0.0795714248200598 + 0.13783637986068467im
-----------------------------------------------------------------
=================================================================
i = 80
lambda = 14.31040930104895 - 0.5230838970946081im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.035437038899055716 - 0.009844206110573035im
Formula2 = -0.03543703889905568 - 0.009844206110573015im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 1.4613195660449528e-7 + 1.838227379639435e-7im
Formula2 = 1.4613195660449488e-7 + 1.8382273796394315e-7im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.03543689276709911 + 0.009844022287835071im
Formula2 = 0.035436892767099076 + 0.00984402228783505im
-----------------------------------------------------------------
=================================================================
i = 81
lambda = 16.851227335437983 - 48.25365589134447im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -1.2731559239656067e-26 + 5.7600056493403e-28im
Formula2 = -1.273155923965594e-26 + 5.760005649338314e-28im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 2.6088821713889653e-39 - 6.474002336623332e-40im
Formula2 = 2.6088821713889477e-39 - 6.474002336622879e-40im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 1.2731559239653458e-26 - 5.760005649333827e-28im
Formula2 = 1.2731559239653332e-26 - 5.76000564933184e-28im
-----------------------------------------------------------------
=================================================================
i = 82
lambda = -11.48162252554932 - 28.265563397177363im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -1.2942340090037253e-15 + 2.508101615937811e-16im
Formula2 = -1.2942340090037314e-15 + 2.5081016159376517e-16im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 1.2942340119998387e-15 - 2.508101612992339e-16im
Formula2 = 1.2942340119998448e-15 - 2.508101612992179e-16im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -2.996113457894878e-24 - 2.9454722443265413e-25im
Formula2 = -2.9961134578948807e-24 - 2.9454722443269407e-25im
-----------------------------------------------------------------
=================================================================
i = 83
lambda = -45.655896969156174 + 36.481745324676055im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.15915494309189193 - 1.6955992359013678e-15im
Formula2 = -0.1591549430918953 + 1.8630489674858336e-17im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.15915494327090854 - 5.7656990406755745e-12im
Formula2 = 0.1591549432709119 - 5.767413271036425e-12im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -1.7901660800897442e-10 + 5.7673946404076986e-12im
Formula2 = -1.7901660800897814e-10 + 5.767394640410296e-12im
-----------------------------------------------------------------
=================================================================
i = 84
lambda = -29.53354426175514 + 17.19451527342237im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.15915495037163452 - 8.043252041444424e-9im
Formula2 = -0.15915495037163688 - 8.043251520268864e-9im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.15915496306914878 + 1.247958581894051e-8im
Formula2 = 0.15915496306915114 + 1.247958529776368e-8im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -1.2697514272753492e-8 - 4.4363337774952715e-9im
Formula2 = -1.269751427275364e-8 - 4.436333777495278e-9im
-----------------------------------------------------------------
=================================================================
i = 85
lambda = 15.193520330302817 + 33.91735103470299im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.15915494309189535 + 2.451482755943396e-17im
Formula2 = -0.15915494309189535 - 5.044928233846613e-18im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.08092267111229179 - 0.139025281516821im
Formula2 = 0.08092267111229187 - 0.13902528151682098im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.07823227197960357 + 0.13902528151682092im
Formula2 = 0.07823227197960347 + 0.139025281516821im
-----------------------------------------------------------------
=================================================================
i = 86
lambda = -18.482408169842767 - 30.087744082751367im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 4.4908930879641955e-15 + 5.3466176615123755e-15im
Formula2 = 4.490893087964201e-15 + 5.346617661512409e-15im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -4.490893087964288e-15 - 5.346617661511859e-15im
Formula2 = -4.4908930879642925e-15 - 5.346617661511892e-15im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 9.178929385271818e-29 - 5.169383060814222e-28im
Formula2 = 9.178929385271861e-29 - 5.169383060814255e-28im
-----------------------------------------------------------------
=================================================================
i = 87
lambda = 18.693126095463057 + 13.434366705224818im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.15915523606755652 - 3.6228181505974685e-7im
Formula2 = -0.15915523606755538 - 3.622818141200417e-7im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 1.145920295764878e-5 - 2.1666499558616105e-5im
Formula2 = 1.1459202957648558e-5 - 2.1666499558616078e-5im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.15914377686459888 + 2.2028781373675845e-5im
Formula2 = 0.1591437768645977 + 2.202878137273612e-5im
-----------------------------------------------------------------
=================================================================
i = 88
lambda = 16.691489261714153 - 26.78233825754104im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 5.640788963690118e-14 + 1.8821394017621488e-13im
Formula2 = 5.6407889636900936e-14 + 1.8821394017621528e-13im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 3.38548102184757e-26 + 2.604768247263214e-25im
Formula2 = 3.3854810218475376e-26 + 2.6047682472632164e-25im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -5.6407889636935033e-14 - 1.8821394017647536e-13im
Formula2 = -5.6407889636934793e-14 - 1.8821394017647577e-13im
-----------------------------------------------------------------
=================================================================
i = 89
lambda = 12.16593927146257 - 5.20476005734043im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.00034899804525525397 - 0.00026452114151166695im
Formula2 = 0.0003489980452552541 - 0.00026452114151166684im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -6.61910231403649e-10 + 1.5917933635756936e-9im
Formula2 = -6.619102314036497e-10 + 1.591793363575692e-9im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -0.0003489973833450226 + 0.0002645195497183034im
Formula2 = -0.00034899738334502264 + 0.0002645195497183032im
-----------------------------------------------------------------
=================================================================
i = 90
lambda = -9.644328145952777 + 39.49840150568744im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.15915494309189535 - 4.658681209898652e-21im
Formula2 = -0.15915494309189535
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.07957725815939434 - 0.1378313560963915im
Formula2 = 0.0795772581593944 - 0.1378313560963915im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.07957768493250102 + 0.13783135609639144im
Formula2 = 0.07957768493250093 + 0.1378313560963915im
-----------------------------------------------------------------
=================================================================
i = 91
lambda = -28.304275863531103 + 9.1518853539851im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.15913894810011572 - 2.9711950852222616e-5im
Formula2 = -0.15913894810011725 - 2.971195085203915e-5im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.15913894850096394 + 2.9711377985241767e-5im
Formula2 = 0.15913894850096547 + 2.9711377985058296e-5im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -4.0084820894935396e-10 + 5.728669808486588e-10im
Formula2 = -4.0084820894935986e-10 + 5.728669808486667e-10im
-----------------------------------------------------------------
=================================================================
i = 92
lambda = 6.0119102880290995 + 28.24476369305519im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.15915494309189535 - 9.975083503340268e-18im
Formula2 = -0.15915494309189535 - 9.825582188149884e-18im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.07957008931226188 - 0.1378245041445865im
Formula2 = 0.07957008931226194 - 0.13782450414458652im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.07958485377963348 + 0.13782450414458644im
Formula2 = 0.0795848537796334 + 0.13782450414458652im
-----------------------------------------------------------------
=================================================================
i = 93
lambda = 23.062688965705732 - 18.067780236223907im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 5.899689712109815e-10 + 9.667247644511338e-10im
Formula2 = 5.899689712109811e-10 + 9.667247644511338e-10im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -5.695642460301826e-22 + 5.561043116328491e-23im
Formula2 = -5.695642460301838e-22 + 5.561043116328595e-23im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -5.89968971210412e-10 - 9.667247644511894e-10im
Formula2 = -5.899689712104116e-10 - 9.667247644511894e-10im
-----------------------------------------------------------------
=================================================================
i = 94
lambda = -2.732101659428409 + 10.373421942330218im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.15915519495246985 - 1.5725412553069292e-7im
Formula2 = -0.15915519495246985 - 1.5725412552799004e-7im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.08257723219364425 - 0.14153682409349702im
Formula2 = 0.08257723219364431 - 0.14153682409349702im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.07657796275882563 + 0.1415369813476225im
Formula2 = 0.07657796275882553 + 0.14153698134762255im
-----------------------------------------------------------------
=================================================================
i = 95
lambda = -30.006291426492737 - 33.13461292496189im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 3.0300286013082363e-16 - 1.1490487240023038e-16im
Formula2 = 3.0300286013082215e-16 - 1.1490487240023117e-16im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -3.0300286013082363e-16 + 1.1490487240023038e-16im
Formula2 = -3.0300286013082215e-16 + 1.1490487240023117e-16im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 1.7607987101061484e-34 + 1.2202475690973323e-34im
Formula2 = 1.7607987101061454e-34 + 1.2202475690973236e-34im
-----------------------------------------------------------------
=================================================================
i = 96
lambda = -30.020095877079722 + 31.548103986811654im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.15915494309189812 - 3.942872724415356e-15im
Formula2 = -0.15915494309190129 - 2.1636863714548024e-15im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.15916537580396853 + 4.957019708683473e-6im
Formula2 = 0.1591653758039717 + 4.9570197069042266e-6im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -1.0432712070408833e-5 - 4.957019704740595e-6im
Formula2 = -1.0432712070408994e-5 - 4.95701970474054e-6im
-----------------------------------------------------------------
=================================================================
i = 97
lambda = -33.87174513935922 + 35.74980934044288im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.1591549430918922 - 1.6859301430502231e-15im
Formula2 = -0.15915494309189523 - 3.3530646250008733e-17im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.1591581767112372 - 9.123339109538914e-7im
Formula2 = 0.15915817671124022 - 9.123339126063501e-7im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -3.2336193449844053e-6 + 9.123339126398213e-7im
Formula2 = -3.2336193449844383e-6 + 9.123339126398788e-7im
-----------------------------------------------------------------
=================================================================
i = 98
lambda = 18.421266232139445 + 18.996830738445553im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.15915494455235216 - 1.0333190134859548e-9im
Formula2 = -0.15915494455235155 - 1.0333176970904522e-9im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.000435845918172962 + 0.0002463308911792676im
Formula2 = 0.00043584591817296076 + 0.0002463308911792626im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.1587190986341792 - 0.00024632985786025407im
Formula2 = 0.1587190986341786 - 0.0002463298578615655im
-----------------------------------------------------------------
=================================================================
i = 99
lambda = -28.69025691400775 - 14.236288012549572im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -5.6147247725198765e-9 - 5.19429098660176e-8im
Formula2 = -5.6147247725198045e-9 - 5.1942909866017614e-8im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 5.614724772520916e-9 + 5.194290986601671e-8im
Formula2 = 5.614724772520844e-9 + 5.194290986601672e-8im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -1.0400792569038196e-21 + 8.931256931447074e-22im
Formula2 = -1.0400792569038149e-21 + 8.931256931447099e-22im
-----------------------------------------------------------------
=================================================================
i = 100
lambda = -8.151420662261643 - 18.68136331653436im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -7.460883141141848e-11 + 7.74432288918956e-11im
Formula2 = -7.460883141141922e-11 + 7.744322889189477e-11im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 7.460875383781792e-11 - 7.744324011138352e-11im
Formula2 = 7.460875383781867e-11 - 7.744324011138269e-11im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 7.757360055653768e-17 + 1.1219487918951952e-17im
Formula2 = 7.757360055653744e-17 + 1.1219487918952767e-17im
-----------------------------------------------------------------
=================================================================
Out[183]:
true

Problem 2

\begin{alignat*}{3} q_t(x,t) + q_{xxx}(x,t) &= 0,\quad &(x,t)&\in (0,1)\times (0,T)\\ q(x,0) &= f(x),\quad &x&\in [0,1]\\ q(0,t) &= 0, \quad &t&\in [0,T]\\ q(1,t) &= 0\quad &t&\in [0,T]\\ q_x(1,t) &= 0 \quad &t&\in [0,T]. \end{alignat*}

\begin{align*} F_\lambda^+(f) &= \frac{1}{2\pi\Delta(\lambda)}\left[\text{FT}[f](\lambda)(\alpha e^{-\alpha\lambda} + \alpha^2 e^{-i\alpha^2\lambda}) - (\alpha\text{FT}[f](\alpha\lambda) + \alpha^2\text{FT}[f](\alpha^2\lambda))e^{-i\lambda}\right]\\ F_\lambda^-(f) &= \frac{e^{-i\lambda}}{2\pi\Delta(\lambda)}\left[-\text{FT}[f](\lambda) - \alpha\text{FT}[f](\alpha\lambda) - \alpha^2\text{FT}[f](\alpha^2\lambda)\right], \end{align*} where \begin{align*} \Delta(\lambda) = e^{-i\lambda} + \alpha e^{-i\alpha\lambda} + \alpha^2e^{-i\alpha^2\lambda}. \end{align*}

In [184]:
n = 3

t = symbols("t")
symPFunctions = [1 0 0 0]
interval = (0, 1)
symL = SymLinearDifferentialOperator(symPFunctions, interval, t)
L = get_L(symL)
M = [1 0 0; 0 0 0; 0 0 0]
N = [0 0 0; 1 0 0; 0 1 0]
U = VectorBoundaryForm(M, N)
Out[184]:
VectorBoundaryForm([1 0 0; 0 0 0; 0 0 0], [0 0 0; 1 0 0; 0 1 0])
In [185]:
c = symbols("c")
FT = SymFunction("FT[f]")(c)
FTc = symbols("FT[f](c)")
alpha = symbols("alpha")
lambda = symbols("lambda")
Out[185]:
$$\lambda$$
In [186]:
deltaFormula = e^(-im*lambda) + alpha*e^(-im*alpha*lambda) + alpha^2*e^(-im*alpha^2*lambda)
Out[186]:
$$\alpha^{2} e^{- i \alpha^{2} \lambda} + \alpha e^{- i \alpha \lambda} + e^{- i \lambda}$$
In [187]:
FPlusFormula = 1/(2*PI*deltaFormula) * (FT(lambda)*(alpha*e^(-im*alpha*lambda) + alpha^2*e^(-im*alpha^2*lambda)) - (alpha*FT(alpha*lambda) + alpha^2*FT(alpha^2*lambda))*e^(-im*lambda))
Out[187]:
$$\frac{- \left(\alpha^{2} \operatorname{FT[f]}{\left (\alpha^{2} \lambda \right )} + \alpha \operatorname{FT[f]}{\left (\alpha \lambda \right )}\right) e^{- i \lambda} + \left(\alpha^{2} e^{- i \alpha^{2} \lambda} + \alpha e^{- i \alpha \lambda}\right) \operatorname{FT[f]}{\left (\lambda \right )}}{2 \pi \left(\alpha^{2} e^{- i \alpha^{2} \lambda} + \alpha e^{- i \alpha \lambda} + e^{- i \lambda}\right)}$$
In [188]:
FMinusFormula = (e^(-im*lambda))/(2*PI*deltaFormula) * (-FT(lambda) - alpha*FT(alpha*lambda) - alpha^2*FT(alpha^2*lambda))
Out[188]:
$$\frac{\left(- \alpha^{2} \operatorname{FT[f]}{\left (\alpha^{2} \lambda \right )} - \alpha \operatorname{FT[f]}{\left (\alpha \lambda \right )} - \operatorname{FT[f]}{\left (\lambda \right )}\right) e^{- i \lambda}}{2 \pi \left(\alpha^{2} e^{- i \alpha^{2} \lambda} + \alpha e^{- i \alpha \lambda} + e^{- i \lambda}\right)}$$
In [189]:
adjointU = get_adjointU(L, U)
(FPlusSymGeneric, FMinusSymGeneric) = get_FPlusMinus(adjointU; symbolic = true, generic = true)
prettyPrint(simplify(FPlusSymGeneric))
Out[189]:
$$\frac{0.5 \left(\alpha \operatorname{FT[f]}{\left (\lambda \right )} e^{i \lambda \left(\alpha^{2} + 1\right)} - \alpha \operatorname{FT[f]}{\left (\alpha \lambda \right )} e^{i \alpha \lambda \left(\alpha + 1\right)} - \operatorname{FT[f]}{\left (\lambda \right )} e^{i \lambda \left(\alpha + 1\right)} + \operatorname{FT[f]}{\left (\lambda \right )} e^{i \lambda \left(\alpha^{2} + 1\right)} - \operatorname{FT[f]}{\left (\alpha \lambda \right )} e^{i \alpha \lambda \left(\alpha + 1\right)} + \operatorname{FT[f]}{\left (\alpha^{2} \lambda \right )} e^{i \alpha \lambda \left(\alpha + 1\right)}\right)}{\pi \left(\alpha e^{i \lambda \left(\alpha^{2} + 1\right)} - \alpha e^{i \alpha \lambda \left(\alpha + 1\right)} - e^{i \lambda \left(\alpha + 1\right)} + e^{i \lambda \left(\alpha^{2} + 1\right)}\right)}$$
In [190]:
prettyPrint(simplify(FMinusSymGeneric))
Out[190]:
$$\frac{0.5 \left(\alpha \operatorname{FT[f]}{\left (\lambda \right )} - \alpha \operatorname{FT[f]}{\left (\alpha \lambda \right )} - \operatorname{FT[f]}{\left (\alpha \lambda \right )} + \operatorname{FT[f]}{\left (\alpha^{2} \lambda \right )}\right) e^{i \alpha \lambda \left(\alpha + 1\right)}}{\pi \left(\alpha e^{i \lambda \left(\alpha^{2} + 1\right)} - \alpha e^{i \alpha \lambda \left(\alpha + 1\right)} - e^{i \lambda \left(\alpha + 1\right)} + e^{i \lambda \left(\alpha^{2} + 1\right)}\right)}$$
In [191]:
test_formula(FPlusFormula, FPlusSymGeneric)
i = 1
lambda = -11.20639881139207 + 14.578379369524612im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 8.258448055082869e-7 - 9.39815970021086e-8im
Formula2 = 8.258448055082858e-7 - 9.398159700210929e-8im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.07957714001399536 - 0.13783146166206836im
Formula2 = 0.07957714001399543 - 0.1378314616620684im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.07957697723309447 + 0.1378315556436653im
Formula2 = 0.0795769772330944 + 0.1378315556436654im
-----------------------------------------------------------------
=================================================================
i = 2
lambda = -11.290078156528473 - 12.37980655389881im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494309192946 - 6.987729461426233e-14im
Formula2 = 0.15915494309192946 - 6.987729588481175e-14im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 4.345238077486239e-14 + 6.449285778939311e-14im
Formula2 = 4.3452380774862664e-14 + 6.449285778939312e-14im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -7.757864359570273e-14 + 5.384436711248845e-15im
Formula2 = -7.757864359570288e-14 + 5.384436711249049e-15im
-----------------------------------------------------------------
=================================================================
i = 3
lambda = 16.00793283866733 + 5.5131935532186205im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.1586464163692813 - 0.00030012715875789357im
Formula2 = 0.1586464163692813 - 0.00030012715875789336im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.0005141811051569947 - 0.00029033348090804373im
Formula2 = 0.0005141811051569944 - 0.00029033348090804314im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -5.654382542967082e-6 + 0.0005904606396659371im
Formula2 = -5.654382542967623e-6 + 0.0005904606396659364im
-----------------------------------------------------------------
=================================================================
i = 4
lambda = 24.118397578020634 + 13.973910328136107im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.07663695670789292 + 0.004306282761338454im
Formula2 = 0.07663695670789292 + 0.0043062827613384im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.03752964292480309 - 0.07361581385835374im
Formula2 = 0.03752964292480317 - 0.07361581385835371im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.04498834345919934 + 0.06930953109701525im
Formula2 = 0.04498834345919925 + 0.06930953109701532im
-----------------------------------------------------------------
=================================================================
i = 5
lambda = -49.07908281049396 + 15.982778010458176im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494311918538 - 1.4270943740555997e-9im
Formula2 = 0.15915494311918538 - 1.4270943740564467e-9im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 1.222254966806328e-9 + 7.371810458020081e-10im
Formula2 = 1.2222549668063154e-9 + 7.371810458019998e-10im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -1.2495449962560827e-9 + 6.899133282549822e-10im
Formula2 = -1.2495449962560692e-9 + 6.899133282549747e-10im
-----------------------------------------------------------------
=================================================================
i = 6
lambda = 46.95979377594146 + 8.966239927149111im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494309185033 - 2.360442418104401e-13im
Formula2 = 0.15915494309185033 - 2.360442401163742e-13im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 2.2693045265946991e-13 + 7.903340879252146e-14im
Formula2 = 2.269304526594715e-13 + 7.903340879251994e-14im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -1.819101660917389e-13 + 1.5701083249914216e-13im
Formula2 = -1.8191016609173843e-13 + 1.570108324991442e-13im
-----------------------------------------------------------------
=================================================================
i = 7
lambda = -40.95443004923851 + 29.2703751351672im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 2.113921954381025e-5 - 2.7202015619213877e-5im
Formula2 = 2.1139219543810224e-5 - 2.7202015619213857e-5im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.07959045957273611 - 0.1378003157464973im
Formula2 = 0.07959045957273617 - 0.13780031574649731im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.07954334429961543 + 0.13782751776211646im
Formula2 = 0.07954334429961536 + 0.13782751776211652im
-----------------------------------------------------------------
=================================================================
i = 8
lambda = -6.779715140109218 - 21.113835517353507im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494309189532 - 2.0455845676191353e-18im
Formula2 = 0.15915494309189532 - 2.049819732355407e-18im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 5.585421817110256e-18 - 5.582715363040353e-18im
Formula2 = 5.585421817110241e-18 - 5.582715363040366e-18im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 2.0420624179354836e-18 + 7.628474865989498e-18im
Formula2 = 2.0420624179355e-18 + 7.628474865989492e-18im
-----------------------------------------------------------------
=================================================================
i = 9
lambda = -4.277290136095459 - 41.81023339509249im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494309189535 - 1.6940658945086007e-21im
Formula2 = 0.15915494309189535
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -2.0219211000400173e-30 + 1.0314637663139097e-30im
Formula2 = -2.021921100040006e-30 + 1.0314637663139032e-30im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 1.1768672530898667e-31 - 2.2667669202393872e-30im
Formula2 = 1.1768672530898754e-31 - 2.266766920239374e-30im
-----------------------------------------------------------------
=================================================================
i = 10
lambda = -5.095014643241669 - 41.21513750361025im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494309189535
Formula2 = 0.15915494309189535
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -8.07635957733994e-31 - 2.6086742733590482e-30im
Formula2 = -8.076359577339903e-31 - 2.6086742733590293e-30im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 2.662996169794844e-30 + 6.049038802721095e-31im
Formula2 = 2.662996169794825e-30 + 6.049038802721042e-31im
-----------------------------------------------------------------
=================================================================
i = 11
lambda = 44.15200206221695 - 46.305186647249606im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494309189535 - 8.470329472543003e-22im
Formula2 = 0.15915494309189535
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -1.470563149178358e-48 + 2.259302429023399e-48im
Formula2 = -1.470563149178363e-48 + 2.259302429023397e-48im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -1.2213317237769736e-48 - 2.4031962595694023e-48im
Formula2 = -1.2213317237769682e-48 - 2.403196259569406e-48im
-----------------------------------------------------------------
=================================================================
i = 12
lambda = 29.400959147102952 + 10.806625245661117im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15914661788355824 - 1.279458098184787e-5im
Formula2 = 0.15914661788355824 - 1.2794580981847844e-5im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 1.5243036329597641e-5 - 8.125514207855989e-7im
Formula2 = 1.5243036329597624e-5 - 8.125514207856048e-7im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -6.91782799251735e-6 + 1.3607132402633466e-5im
Formula2 = -6.917827992517341e-6 + 1.360713240263345e-5im
-----------------------------------------------------------------
=================================================================
i = 13
lambda = -6.255396577863358 - 23.669048856362807im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494309189535 + 1.0503208545953324e-19im
Formula2 = 0.15915494309189535 + 1.0545560193316039e-19im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -2.154582178763631e-19 + 1.6140570120305755e-19im
Formula2 = -2.1545821787636265e-19 + 1.6140570120305892e-19im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -3.205232861930687e-20 - 2.672951407365817e-19im
Formula2 = -3.205232861930818e-20 - 2.6729514073658193e-19im
-----------------------------------------------------------------
=================================================================
i = 14
lambda = 6.654524347768167 - 20.701558589125348im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494309189532 + 6.828567862527356e-18im
Formula2 = 0.15915494309189532 + 6.827085554869661e-18im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 1.5056773900636103e-18 - 1.6265622905290685e-17im
Formula2 = 1.5056773900636114e-18 - 1.6265622905290676e-17im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 1.3333603949327977e-17 + 9.436766322344277e-18im
Formula2 = 1.3333603949327963e-17 + 9.436766322344277e-18im
-----------------------------------------------------------------
=================================================================
i = 15
lambda = -5.846838772814245 - 33.67723817242108im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494309189535 - 1.6940658945086007e-21im
Formula2 = 0.15915494309189535
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 1.0178802432267029e-25 - 5.539035544258981e-26im
Formula2 = 1.0178802432267033e-25 - 5.539035544259013e-26im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -2.9245572234026962e-27 + 1.158461925857557e-25im
Formula2 = -2.924557223402479e-27 + 1.1584619258575588e-25im
-----------------------------------------------------------------
=================================================================
i = 16
lambda = 44.570132057216895 + 3.2202475946510702im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494309189562 + 1.7031291470442217e-16im
Formula2 = 0.15915494309189562 + 1.7031122063852766e-16im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -2.968403742862911e-16 + 1.7351572705997877e-16im
Formula2 = -2.968403742862888e-16 + 1.7351572705997798e-16im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -1.848840446923095e-18 - 3.4382916853079854e-16im
Formula2 = -1.848840446923422e-18 - 3.4382916853079607e-16im
-----------------------------------------------------------------
=================================================================
i = 17
lambda = -10.312321684279759 + 12.702494693247445im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -6.124128833426254e-6 + 1.822439207183509e-6im
Formula2 = -6.124128833426263e-6 + 1.8224392071834997e-6im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.07957895533171407 - 0.13783843872619742im
Formula2 = 0.07957895533171414 - 0.13783843872619742im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.0795821118890147 + 0.13783661628699018im
Formula2 = 0.07958211188901462 + 0.13783661628699023im
-----------------------------------------------------------------
=================================================================
i = 18
lambda = 32.99418605383555 + 15.898440184263137im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.16030727922492094 + 0.0008305153972819823im
Formula2 = 0.16030727922492094 + 0.0008305153972819864im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -0.001295415498793118 + 0.0005826946662578961im
Formula2 = -0.0012954154987931219 + 0.0005826946662578934im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.0001430793657675255 - 0.001413210063539878im
Formula2 = 0.00014307936576753028 - 0.0014132100635398798im
-----------------------------------------------------------------
=================================================================
i = 19
lambda = 15.653449466405789 - 0.4555295903202463im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915483906094482 + 4.927240125589865e-9im
Formula2 = 0.15915483906094482 + 4.927240125588171e-9im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 4.77483601313316e-8 - 9.255706597674304e-8im
Formula2 = 4.7748360131331546e-8 - 9.255706597674303e-8im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 5.628259036994604e-8 + 8.762982585115274e-8im
Formula2 = 5.628259036994601e-8 + 8.76298258511527e-8im
-----------------------------------------------------------------
=================================================================
i = 20
lambda = 13.880509039500154 - 34.70106485091029im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494309189535 + 1.6940658945086007e-21im
Formula2 = 0.15915494309189535
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 2.329778887120207e-29 - 4.56615751068933e-30im
Formula2 = 2.3297788871202137e-29 - 4.566157510689385e-30im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -7.694486033662956e-30 + 2.2459555769812038e-29im
Formula2 = -7.694486033662949e-30 + 2.245955576981212e-29im
-----------------------------------------------------------------
=================================================================
i = 21
lambda = -0.3255790041548181 - 47.71531524295178im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494309189535 + 1.6940658945086007e-21im
Formula2 = 0.15915494309189535
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -9.025261828101007e-33 - 2.085901196373819e-32im
Formula2 = -9.025261828100907e-33 - 2.0859011963738192e-32im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 2.2577065172491306e-32 + 2.6133999629276346e-33im
Formula2 = 2.2577065172491254e-32 + 2.6133999629277304e-33im
-----------------------------------------------------------------
=================================================================
i = 22
lambda = 24.42687823866754 + 11.046580792554025im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.159765880411746 - 0.0015124930950741996im
Formula2 = 0.159765880411746 - 0.001512493095074204im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.001004388783457482 + 0.0012853337866477453im
Formula2 = 0.0010043887834574837 + 0.001285333786647752im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -0.001615326103308136 + 0.00022715930842645457im
Formula2 = -0.0016153261033081425 + 0.00022715930842645232im
-----------------------------------------------------------------
=================================================================
i = 23
lambda = -14.286429483980378 + 25.43687309659562im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 7.663532667713271e-17 - 1.0102979266559153e-12im
Formula2 = 7.663532667944644e-17 - 1.0102979266559169e-12im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.07957747154682254 - 0.13783222385494281im
Formula2 = 0.0795774715468226 - 0.13783222385494281im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.07957747154507273 + 0.13783222385595303im
Formula2 = 0.07957747154507266 + 0.13783222385595312im
-----------------------------------------------------------------
=================================================================
i = 24
lambda = -3.930352442314657 + 8.860570431396653im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -8.088506458688467e-6 - 3.6635608977619945e-7im
Formula2 = -8.088506458688458e-6 - 3.663560897761997e-7im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.07958183307285756 - 0.13783904552947504im
Formula2 = 0.07958183307285761 - 0.13783904552947504im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.07958119852549649 + 0.13783941188556476im
Formula2 = 0.0795811985254964 + 0.13783941188556484im
-----------------------------------------------------------------
=================================================================
i = 25
lambda = -32.55056126447322 - 2.2984931082926465im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494309189465 + 2.817011354001517e-15im
Formula2 = 0.15915494309189465 + 2.817012201034464e-15im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -2.1023782650109474e-15 - 1.9925986454654547e-15im
Formula2 = -2.10237826501095e-15 - 1.992598645465441e-15im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 2.7768301790250194e-15 - 8.244136631310063e-16im
Formula2 = 2.7768301790250087e-15 - 8.244136631310146e-16im
-----------------------------------------------------------------
=================================================================
i = 26
lambda = -1.2439160311355835 - 12.676953476214535im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494290182114 + 2.0860754707063107e-10im
Formula2 = 0.15915494290182114 + 2.08607547068937e-10im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -8.56223306169824e-11 - 2.689128672521531e-10im
Formula2 = -8.562233061698286e-11 - 2.6891286725215333e-10im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 2.756965397533682e-10 + 6.03053201805396e-11im
Formula2 = 2.7569653975336864e-10 + 6.030532018053942e-11im
-----------------------------------------------------------------
=================================================================
i = 27
lambda = -47.97778621720812 - 38.094864402364976im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494309189535 + 1.6940658945086007e-21im
Formula2 = 0.15915494309189535 + 1.6940658945086007e-21im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -1.4968787621781128e-44 + 1.5976402711756346e-44im
Formula2 = -1.496878762178108e-44 + 1.5976402711756468e-44im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -6.351576798581032e-45 - 2.095155170019468e-44im
Formula2 = -6.351576798581153e-45 - 2.09515517001947e-44im
-----------------------------------------------------------------
=================================================================
i = 28
lambda = 41.33072765478032 + 49.670784681542315im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 2.3455876649460205e-18 + 7.063384629647834e-19im
Formula2 = 2.3455876649460313e-18 + 7.063384629647797e-19im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.07957747154594763 - 0.13783222385544802im
Formula2 = 0.07957747154594769 - 0.13783222385544805im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.07957747154594771 + 0.13783222385544797im
Formula2 = 0.07957747154594765 + 0.13783222385544805im
-----------------------------------------------------------------
=================================================================
i = 29
lambda = -23.067389572607876 - 43.80085076254004im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494309189535
Formula2 = 0.15915494309189535
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -6.42948376666111e-39 - 7.426426321034272e-39im
Formula2 = -6.429483766661192e-39 - 7.426426321034267e-39im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 9.646215736679643e-39 - 1.8548831146310477e-39im
Formula2 = 9.646215736679678e-39 - 1.8548831146311166e-39im
-----------------------------------------------------------------
=================================================================
i = 30
lambda = 24.050749333134718 - 21.743948391791392im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494309189535 - 3.308722450212111e-24im
Formula2 = 0.15915494309189535
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 3.2768467947323466e-26 - 9.793396221472625e-25im
Formula2 = 3.2768467947325096e-26 - 9.793396221472606e-25im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 8.317487577385209e-25 + 5.180481367591092e-25im
Formula2 = 8.317487577385181e-25 + 5.180481367591101e-25im
-----------------------------------------------------------------
=================================================================
i = 31
lambda = 44.73942435066451 + 15.651235132113356im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915492543539403 + 3.276196888384503e-8im
Formula2 = 0.15915492543539403 + 3.276196888384503e-8im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -1.9544446679164086e-8 - 3.167196311355773e-8im
Formula2 = -1.9544446679164258e-8 - 3.167196311355756e-8im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 3.720094798364672e-8 - 1.0900057702876506e-9im
Formula2 = 3.720094798364665e-8 - 1.0900057702878744e-9im
-----------------------------------------------------------------
=================================================================
i = 32
lambda = 49.66810336657241 - 6.938454329380136im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494309189535 - 1.6940658945086007e-21im
Formula2 = 0.15915494309189535
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -8.1500632231987555e-25 - 5.840098468509995e-25im
Formula2 = -8.150063223198861e-25 - 5.840098468510026e-25im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 9.132705245931626e-25 - 4.13811255948441e-25im
Formula2 = 9.132705245931707e-25 - 4.138112559484483e-25im
-----------------------------------------------------------------
=================================================================
i = 33
lambda = 1.3353461995865743 - 24.082818008462148im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494309189535 + 8.180644204582033e-18im
Formula2 = 0.15915494309189535 + 8.185726402265558e-18im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -9.343424173386402e-18 - 1.8202200790977044e-19im
Formula2 = -9.3434241733864e-18 - 1.8202200790976137e-19im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 4.829347769590912e-18 - 8.000631688531359e-18im
Formula2 = 4.8293477695909064e-18 - 8.00063168853136e-18im
-----------------------------------------------------------------
=================================================================
i = 34
lambda = -19.755814473243348 + 22.813119126401162im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 2.0305558463538863e-9 - 5.538282085601526e-9im
Formula2 = 2.0305558463538912e-9 - 5.53828208560151e-9im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.07957747532696269 - 0.13783221932779402im
Formula2 = 0.07957747532696274 - 0.13783221932779405im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.07957746573437682 + 0.13783222486607605im
Formula2 = 0.07957746573437674 + 0.13783222486607613im
-----------------------------------------------------------------
=================================================================
i = 35
lambda = 26.171847449871223 + 2.2435049857936633im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494258135254 - 4.1897041708328057e-10im
Formula2 = 0.15915494258135254 - 4.1897041708243354e-10im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 6.181104166192923e-10 - 2.3265781210655733e-10im
Formula2 = 6.181104166192914e-10 - 2.3265781210655697e-10im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -1.0756763263646065e-10 + 6.516282291893689e-10im
Formula2 = -1.0756763263646074e-10 + 6.516282291893678e-10im
-----------------------------------------------------------------
=================================================================
i = 36
lambda = -42.10853271213588 - 35.057169440138345im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494309189535
Formula2 = 0.15915494309189535
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -2.5546144065955857e-40 + 2.1865499233457884e-40im
Formula2 = -2.5546144065955975e-40 + 2.1865499233458174e-40im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -6.163005769625776e-41 - 3.3056359346583803e-40im
Formula2 = -6.163005769625953e-41 - 3.3056359346584047e-40im
-----------------------------------------------------------------
=================================================================
i = 37
lambda = -23.62329941679784 - 9.135683808965837im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.1591549430918954 + 2.2602481274417927e-16im
Formula2 = 0.1591549430918954 + 2.260256597771265e-16im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -2.219083492591673e-16 - 6.769197187528716e-17im
Formula2 = -2.219083492591666e-16 - 6.769197187528632e-17im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 1.6957714190584403e-16 - 1.5833228183266505e-16im
Formula2 = 1.69577141905843e-16 - 1.5833228183266475e-16im
-----------------------------------------------------------------
=================================================================
i = 38
lambda = -14.57519544299619 - 39.69909446615985im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494309189535
Formula2 = 0.15915494309189535 - 1.6940658945086007e-21im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 3.299248092133189e-33 + 6.417594101836865e-33im
Formula2 = 3.2992480921332106e-33 + 6.417594101836842e-33im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -7.207423569434497e-33 - 3.515643897437474e-34im
Formula2 = -7.207423569434487e-33 - 3.5156438974372006e-34im
-----------------------------------------------------------------
=================================================================
i = 39
lambda = 24.185614307724705 + 18.424544729286737im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.00011934161674839131 - 0.0001576588894709673im
Formula2 = -0.00011934161674839208 - 0.00015765888947096704im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.07977367895773613 - 0.13785674728254535im
Formula2 = 0.0797736789577362 - 0.13785674728254538im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.07950060575090762 + 0.13801440617201627im
Formula2 = 0.07950060575090753 + 0.13801440617201632im
-----------------------------------------------------------------
=================================================================
i = 40
lambda = -41.14081246303209 + 1.683884115851967im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494309189585 - 4.357188302652956e-16im
Formula2 = 0.15915494309189585 - 4.3571904202353243e-16im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 1.2364662089765778e-16 + 6.572755967479693e-16im
Formula2 = 1.2364662089765956e-16 + 6.5727559674797e-16im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -6.310406745201469e-16 - 2.2155668358450906e-16im
Formula2 = -6.310406745201482e-16 - 2.2155668358450805e-16im
-----------------------------------------------------------------
=================================================================
i = 41
lambda = 7.081723760899017 + 18.70863459643924im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -3.805471423131279e-11 - 2.861857622081831e-11im
Formula2 = -3.805471423131276e-11 - 2.8618576220818326e-11im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.0795774715897594 - 0.13783222387409508im
Formula2 = 0.07957747158975946 - 0.1378322238740951im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.07957747154019067 + 0.1378322239027136im
Formula2 = 0.07957747154019058 + 0.13783222390271369im
-----------------------------------------------------------------
=================================================================
i = 42
lambda = 37.75845949470762 - 6.711603373640209im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494309189535 + 1.6940658945086007e-20im
Formula2 = 0.15915494309189535 + 1.9905274260476058e-20im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -3.6002892784232916e-20 + 2.256135368552123e-20im
Formula2 = -3.6002892784232783e-20 + 2.2561353685521063e-20im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -1.5372590433106083e-21 - 4.246009660363377e-20im
Formula2 = -1.5372590433105121e-21 - 4.246009660363358e-20im
-----------------------------------------------------------------
=================================================================
i = 43
lambda = 0.24582952189015828 - 48.592061332020094im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494309189535
Formula2 = 0.15915494309189535
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 2.0590320618594415e-34 + 2.5382751210885923e-33im
Formula2 = 2.059032061859323e-34 + 2.5382751210885923e-33im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -2.3011623397497154e-33 - 1.0908201532666028e-33im
Formula2 = -2.3011623397497085e-33 - 1.0908201532666138e-33im
-----------------------------------------------------------------
=================================================================
i = 44
lambda = -43.93707031892864 - 11.868190578831886im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494309189535 + 1.6940658945086007e-21im
Formula2 = 0.15915494309189535
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 8.744927054193918e-26 + 1.107557878086034e-26im
Formula2 = 8.744927054193925e-26 + 1.1075578780860204e-26im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -5.33163678568105e-26 + 7.019550044130733e-26im
Formula2 = -5.331636785681045e-26 + 7.019550044130744e-26im
-----------------------------------------------------------------
=================================================================
i = 45
lambda = -36.0661215519861 + 2.0104593478758233im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494309187908 - 8.69420163575503e-14im
Formula2 = 0.15915494309187908 - 8.69420163575503e-14im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 8.341915475183242e-14 + 2.939781801999815e-14im
Formula2 = 8.341915475183242e-14 + 2.9397818019997644e-14im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -6.716883459706654e-14 + 5.754419816731318e-14im
Formula2 = -6.716883459706611e-14 + 5.75441981673134e-14im
-----------------------------------------------------------------
=================================================================
i = 46
lambda = -16.495960033991963 + 16.467426416053726im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -4.611537113277258e-6 + 1.2210812146072164e-6im
Formula2 = -4.611537113277265e-6 + 1.2210812146071963e-6im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.07957871982715234 - 0.13783682810434592im
Formula2 = 0.0795787198271524 - 0.13783682810434594im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.07958083480185629 + 0.13783560702313125im
Formula2 = 0.07958083480185621 + 0.13783560702313133im
-----------------------------------------------------------------
=================================================================
i = 47
lambda = 21.520405389259054 + 21.43794249979625im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -1.911019120413912e-7 + 9.617814261226959e-8im
Formula2 = -1.911019120413923e-7 + 9.617814261227001e-8im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.07957748380418886 - 0.13783243744362986im
Formula2 = 0.07957748380418893 - 0.13783243744362988im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.07957765038961853 + 0.13783234126548718im
Formula2 = 0.07957765038961845 + 0.13783234126548727im
-----------------------------------------------------------------
=================================================================
i = 48
lambda = 21.825900734989972 - 48.985113153876746im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494309189535 - 8.470329472543003e-22im
Formula2 = 0.15915494309189535
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 1.1674343109910178e-41 + 3.0896732060283555e-42im
Formula2 = 1.1674343109910132e-41 + 3.089673206028277e-42im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -8.512907040767754e-42 + 8.565441102663864e-42im
Formula2 = -8.512907040767666e-42 + 8.565441102663861e-42im
-----------------------------------------------------------------
=================================================================
i = 49
lambda = -44.53520942132314 + 26.865249690612387im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.01034678207406452 + 0.028691666668382573im
Formula2 = -0.010346782074064427 + 0.02869166666838272im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.059903150371245356 - 0.1611386333132006im
Formula2 = 0.05990315037124524 - 0.16113863331320064im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.1095985747947145 + 0.13244696664481798im
Formula2 = 0.10959857479471452 + 0.13244696664481792im
-----------------------------------------------------------------
=================================================================
i = 50
lambda = -44.44849043611458 - 14.447460757049612im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494309189535
Formula2 = 0.15915494309189535 - 1.6940658945086007e-21im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 2.69692257025834e-28 - 1.1508208912862093e-27im
Formula2 = 2.6969225702583314e-28 - 1.1508208912862186e-27im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 8.617939985467901e-28 + 8.08970791431439e-28im
Formula2 = 8.617939985467982e-28 + 8.08970791431443e-28im
-----------------------------------------------------------------
=================================================================
i = 51
lambda = -38.266628717907714 - 49.93371792351549im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494309189535
Formula2 = 0.15915494309189535
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -1.669621146272135e-48 + 9.223137860766836e-49im
Formula2 = -1.6696211462721225e-48 + 9.223137860767006e-49im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 3.606340413305276e-50 - 1.907091220405705e-48im
Formula2 = 3.6063404133032425e-50 - 1.907091220405702e-48im
-----------------------------------------------------------------
=================================================================
i = 52
lambda = 34.10427767350623 - 40.30428984114045im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494309189535 + 2.117582368135751e-22im
Formula2 = 0.15915494309189535
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 1.1253267824113879e-40 - 6.805560167466061e-41im
Formula2 = 1.1253267824113967e-40 - 6.805560167466071e-41im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 2.671540799521506e-42 + 1.3148395895005684e-40im
Formula2 = 2.671540799521112e-42 + 1.3148395895005762e-40im
-----------------------------------------------------------------
=================================================================
i = 53
lambda = 12.441348832133812 - 14.273901957598234im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.1591549430918962 + 1.435490452634386e-15im
Formula2 = 0.1591549430918962 + 1.4354921467002804e-15im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -1.6742628931159306e-15 + 2.8927837344449945e-17im
Formula2 = -1.6742628931159276e-15 + 2.8927837344452096e-17im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 8.12079204541127e-16 - 1.4644181167242513e-15im
Formula2 = 8.120792045411243e-16 - 1.4644181167242494e-15im
-----------------------------------------------------------------
=================================================================
i = 54
lambda = 13.370229062015639 + 43.13259415657282im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -1.332051579150231e-24 + 2.5148575006915857e-25im
Formula2 = -1.3320515791502298e-24 + 2.5148575006915104e-25im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.07957747154594763 - 0.13783222385544802im
Formula2 = 0.0795774715459477 - 0.13783222385544805im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.07957747154594771 + 0.13783222385544797im
Formula2 = 0.07957747154594765 + 0.13783222385544805im
-----------------------------------------------------------------
=================================================================
i = 55
lambda = 24.20149532035363 + 45.63679092165202im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -3.054376676066904e-22 + 2.1831209003443226e-22im
Formula2 = -3.0543766760669282e-22 + 2.183120900344311e-22im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.07957747154594763 - 0.13783222385544802im
Formula2 = 0.0795774715459477 - 0.13783222385544805im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.07957747154594771 + 0.13783222385544797im
Formula2 = 0.07957747154594765 + 0.13783222385544805im
-----------------------------------------------------------------
=================================================================
i = 56
lambda = -27.541608129510497 + 17.05959850196183im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.003178508961524451 - 0.027688192909214017im
Formula2 = 0.0031785089615245965 - 0.027688192909214045im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.10196689550944892 - 0.12123545789400435im
Formula2 = 0.10196689550944893 - 0.12123545789400421im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.054009538620922004 + 0.14892365080321832im
Formula2 = 0.05400953862092182 + 0.14892365080321826im
-----------------------------------------------------------------
=================================================================
i = 57
lambda = -44.91513750636782 + 44.73573907564399im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 1.5642895295306485e-14 - 8.818620685930274e-14im
Formula2 = 1.5642895295306814e-14 - 8.818620685930325e-14im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.07957747154601619 - 0.13783222385539037im
Formula2 = 0.07957747154601624 - 0.1378322238553904im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.07957747154586353 + 0.1378322238554785im
Formula2 = 0.07957747154586345 + 0.13783222385547858im
-----------------------------------------------------------------
=================================================================
i = 58
lambda = -42.069766072208225 + 25.642956466653217im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.01649776771386898 + 0.008919872949260279im
Formula2 = 0.016497767713868988 + 0.008919872949260313im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.06360375111642412 - 0.1280046743841329im
Formula2 = 0.06360375111642415 - 0.12800467438413293im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.07905342426160225 + 0.11908480143487256im
Formula2 = 0.07905342426160221 + 0.11908480143487261im
-----------------------------------------------------------------
=================================================================
i = 59
lambda = 36.21695217888741 + 10.705138442074812im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915497748280652 + 9.98988854212106e-9im
Formula2 = 0.15915497748280652 + 9.989888542120213e-9im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -2.5846952844049917e-8 + 2.4788458462488897e-8im
Formula2 = -2.5846952844050006e-8 + 2.4788458462488963e-8im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -8.543958327145782e-9 - 3.477834700461012e-8im
Formula2 = -8.543958327145778e-9 - 3.477834700461023e-8im
-----------------------------------------------------------------
=================================================================
i = 60
lambda = -15.079970396877542 + 22.973689823680104im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 6.540834153946252e-11 - 4.7475390075991314e-11im
Formula2 = 6.540834153946221e-11 - 4.7475390075991404e-11im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.07957747155435836 - 0.13783222377506504im
Formula2 = 0.07957747155435842 - 0.13783222377506507im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.07957747147212865 + 0.13783222382254037im
Formula2 = 0.07957747147212858 + 0.13783222382254046im
-----------------------------------------------------------------
=================================================================
i = 61
lambda = 34.300540350027745 + 45.3988532803201im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 6.195520269485973e-19 - 3.3146221740217944e-18im
Formula2 = 6.195520269485884e-19 - 3.314622174021772e-18im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.07957747154594763 - 0.13783222385544802im
Formula2 = 0.0795774715459477 - 0.13783222385544805im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.07957747154594771 + 0.13783222385544797im
Formula2 = 0.07957747154594765 + 0.13783222385544805im
-----------------------------------------------------------------
=================================================================
i = 62
lambda = -35.309766122747746 - 10.632511007552338im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494309189535
Formula2 = 0.15915494309189535
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 6.733101431287096e-22 + 7.23805403226731e-22im
Formula2 = 6.733101431287178e-22 + 7.23805403226727e-22im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -9.634889381551428e-22 + 2.2120098696183364e-22im
Formula2 = -9.634889381551434e-22 + 2.212009869618423e-22im
-----------------------------------------------------------------
=================================================================
i = 63
lambda = -29.841578690298356 + 25.02193190985595im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 1.109606009667093e-6 + 7.407624199863691e-7im
Formula2 = 1.1096060096670959e-6 + 7.407624199863728e-7im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.07957627522386893 - 0.13783163328966544im
Formula2 = 0.07957627522386898 - 0.13783163328966547im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.07957755826201676 + 0.1378308925272454im
Formula2 = 0.07957755826201668 + 0.13783089252724548im
-----------------------------------------------------------------
=================================================================
i = 64
lambda = -35.75220541389537 - 26.469807074286077im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494309189535 - 4.235164736271502e-22im
Formula2 = 0.15915494309189535 - 1.6940658945086007e-21im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 3.065636289758854e-32 + 1.0708360473684422e-32im
Formula2 = 3.065636289758879e-32 + 1.0708360473684241e-32im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -2.4601893651886137e-32 + 2.119500882010419e-32im
Formula2 = -2.4601893651886113e-32 + 2.1195008820104484e-32im
-----------------------------------------------------------------
=================================================================
i = 65
lambda = 29.055617374298464 - 8.459088219276254im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494309189532 + 3.5211159617361265e-18im
Formula2 = 0.15915494309189532 + 3.5236570605778894e-18im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -7.47445231505797e-19 - 5.747319568067063e-18im
Formula2 = -7.474452315057998e-19 - 5.747319568067036e-18im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 5.351047365366382e-18 + 2.226353225611969e-18im
Formula2 = 5.351047365366358e-18 + 2.2263532256119546e-18im
-----------------------------------------------------------------
=================================================================
i = 66
lambda = -4.851635365509587 - 13.203962748608667im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494309471342 + 5.253482017965783e-12im
Formula2 = 0.15915494309471342 + 5.253482016271717e-12im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -5.958695085014253e-12 - 1.8620140118886867e-13im
Formula2 = -5.9586950850142565e-12 - 1.8620140118884853e-13im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 3.1406026861569435e-12 - 5.0672806164333845e-12im
Formula2 = 3.140602686156929e-12 - 5.067280616433396e-12im
-----------------------------------------------------------------
=================================================================
i = 67
lambda = 19.701951911657318 - 5.41502612142655im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.1591549430923574 + 1.778093929486282e-12im
Formula2 = 0.1591549430923574 + 1.7780939290627654e-12im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -1.7709006552745358e-12 - 4.88897948096761e-13im
Formula2 = -1.7709006552745315e-12 - 4.888979480967674e-13im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 1.3088483705471485e-12 - 1.2891959809978764e-12im
Formula2 = 1.3088483705471522e-12 - 1.289195980997869e-12im
-----------------------------------------------------------------
=================================================================
i = 68
lambda = -11.686019235334854 - 42.4946564544161im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494309189535 - 1.6940658945086007e-21im
Formula2 = 0.15915494309189535 + 3.3881317890172014e-21im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 1.0789700405814145e-33 + 7.773619249123131e-34im
Formula2 = 1.0789700405814098e-33 + 7.773619249123174e-34im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -1.2127001951995415e-33 + 5.457345026096753e-34im
Formula2 = -1.212700195199543e-33 + 5.457345026096687e-34im
-----------------------------------------------------------------
=================================================================
i = 69
lambda = -28.317928759507073 - 30.60210147658211im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494309189535 + 1.6940658945086007e-21im
Formula2 = 0.15915494309189535 + 1.6940658945086007e-21im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -1.048569683687658e-32 - 3.9919849543728595e-32im
Formula2 = -1.0485696836876761e-32 - 3.991984954372875e-32im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 3.981445223855989e-32 + 1.0879044934747038e-32im
Formula2 = 3.98144522385601e-32 + 1.0879044934746971e-32im
-----------------------------------------------------------------
=================================================================
i = 70
lambda = 12.21894622201689 - 26.91890638261245im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494309189535 - 1.6940658945086007e-21im
Formula2 = 0.15915494309189535 + 1.6940658945086007e-21im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -3.1528665653313843e-24 + 1.1319516917889997e-23im
Formula2 = -3.1528665653313623e-24 + 1.1319516917889987e-23im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -8.226555926794779e-24 - 8.390220999264564e-24im
Formula2 = -8.226555926794776e-24 - 8.390220999264542e-24im
-----------------------------------------------------------------
=================================================================
i = 71
lambda = 19.31568841273672 - 9.152241356924918im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494309189918 - 8.616664578576551e-15im
Formula2 = 0.15915494309189918 - 8.616661190444762e-15im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 5.537798085335328e-15 + 7.641579283140003e-15im
Formula2 = 5.537798085335343e-15 + 7.641579283140005e-15im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -9.386700826899785e-15 + 9.75084181359219e-16im
Formula2 = -9.386700826899793e-15 + 9.750841813592274e-16im
-----------------------------------------------------------------
=================================================================
i = 72
lambda = -0.6973603236534629 - 11.16380434163937im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915493701277783 + 2.125318815828349e-10im
Formula2 = 0.15915493701277783 + 2.1253188158114084e-10im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 2.855500744828117e-9 - 5.370936134260235e-9im
Formula2 = 2.855500744828112e-9 - 5.370936134260231e-9im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 3.223616761959095e-9 + 5.158404252676652e-9im
Formula2 = 3.223616761959091e-9 + 5.158404252676646e-9im
-----------------------------------------------------------------
=================================================================
i = 73
lambda = 14.70329484782404 - 16.431755989527197im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494309189535 - 4.400547919222904e-18im
Formula2 = 0.15915494309189535 - 4.404571325722362e-18im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -2.723253299385646e-19 + 9.273517643967977e-18im
Formula2 = -2.7232532993855147e-19 + 9.273517643967994e-18im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -7.894939197150203e-18 - 4.8725994758047625e-18im
Formula2 = -7.89493919715022e-18 - 4.872599475804762e-18im
-----------------------------------------------------------------
=================================================================
i = 74
lambda = 5.383472884020279 + 46.47604111194639im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 8.810249120414497e-30 + 1.3634766759618536e-30im
Formula2 = 8.810249120414474e-30 + 1.363476675961855e-30im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.07957747154594763 - 0.13783222385544802im
Formula2 = 0.0795774715459477 - 0.13783222385544805im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.07957747154594771 + 0.13783222385544797im
Formula2 = 0.07957747154594765 + 0.13783222385544805im
-----------------------------------------------------------------
=================================================================
i = 75
lambda = 31.330537951735167 - 49.77787276958843im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494309189535
Formula2 = 0.15915494309189535
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 7.193179753698966e-46 - 6.6384253378061156e-46im
Formula2 = 7.193179753698982e-46 - 6.638425337806089e-46im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 2.152455106816909e-46 + 9.548689069594252e-46im
Formula2 = 2.152455106816874e-46 + 9.548689069594254e-46im
-----------------------------------------------------------------
=================================================================
i = 76
lambda = 11.978418025322178 + 22.90517053730423im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -3.589309428870987e-12 + 4.937612307475163e-12im
Formula2 = -3.5893094288709818e-12 + 4.937612307475182e-12im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.07957747154346619 - 0.13783222386102525im
Formula2 = 0.07957747154346625 - 0.13783222386102528im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.07957747155201847 + 0.1378322238560876im
Formula2 = 0.0795774715520184 + 0.13783222385608768im
-----------------------------------------------------------------
=================================================================
i = 77
lambda = 0.6044007088247696 + 47.83436096315698im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 1.8033703236587287e-32 + 1.4338896715568456e-32im
Formula2 = 1.8033703236587287e-32 + 1.433889671556839e-32im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.07957747154594763 - 0.13783222385544802im
Formula2 = 0.0795774715459477 - 0.13783222385544805im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.07957747154594771 + 0.13783222385544797im
Formula2 = 0.07957747154594765 + 0.13783222385544805im
-----------------------------------------------------------------
=================================================================
i = 78
lambda = 44.21876555106405 - 47.25041404472869im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494309189535
Formula2 = 0.15915494309189535
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -5.93104186193775e-49 + 1.6756650356594025e-49im
Formula2 = -5.931041861937775e-49 + 1.675665035659398e-49im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 1.5143524418544737e-49 - 5.97426544117675e-49im
Formula2 = 1.5143524418544923e-49 - 5.974265441176768e-49im
-----------------------------------------------------------------
=================================================================
i = 79
lambda = 41.19764621813597 - 45.71747184251373im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494309189535
Formula2 = 0.15915494309189535 + 3.3881317890172014e-21im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 8.218479624150176e-47 - 1.7760256496630332e-47im
Formula2 = 8.218479624150139e-47 - 1.776025649663108e-47im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -2.5711564816941377e-47 + 8.005424959830354e-47im
Formula2 = -2.5711564816940574e-47 + 8.005424959830358e-47im
-----------------------------------------------------------------
=================================================================
i = 80
lambda = -1.744152261216712 - 29.469132844768776im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494309189535 + 3.3881317890172014e-21im
Formula2 = 0.15915494309189535 + 3.3881317890172014e-21im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -2.3149261065554602e-21 - 3.433182417293509e-22im
Formula2 = -2.3149261065554606e-21 - 3.433182417293479e-22im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 1.4547853721979542e-21 - 1.8331256952961558e-21im
Formula2 = 1.4547853721979525e-21 - 1.833125695296157e-21im
-----------------------------------------------------------------
=================================================================
i = 81
lambda = 37.176968351495645 + 20.89534991273962im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.11377452206266049 + 0.018837152115221332im
Formula2 = 0.11377452206266017 + 0.018837152115221405im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.006376758247883961 - 0.04871917350336159im
Formula2 = 0.006376758247884074 - 0.048719173503361926im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.039003662781350874 + 0.029882021388140244im
Formula2 = 0.03900366278135109 + 0.029882021388140518im
-----------------------------------------------------------------
=================================================================
i = 82
lambda = -11.775110719408175 + 23.335303682299852im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -1.72183199017018e-12 - 2.060408003992529e-12im
Formula2 = -1.7218319901701835e-12 - 2.060408003992525e-12im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.07957747154859292 - 0.13783222385590896im
Formula2 = 0.07957747154859297 - 0.137832223855909im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.07957747154502427 + 0.1378322238579693im
Formula2 = 0.07957747154502419 + 0.1378322238579694im
-----------------------------------------------------------------
=================================================================
i = 83
lambda = -35.649454873916326 + 31.410994281983108im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 6.4967784529959356e-9 - 1.2451499886071743e-8im
Formula2 = 6.496778452996044e-9 - 1.2451499886071793e-8im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.07957747908087362 - 0.1378322120033229im
Formula2 = 0.07957747908087369 - 0.1378322120033229im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.07957745751424328 + 0.1378322244548227im
Formula2 = 0.0795774575142432 + 0.1378322244548228im
-----------------------------------------------------------------
=================================================================
i = 84
lambda = -16.13051422298406 - 4.005716796181893im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494331821423 + 2.474472995424773e-10im
Formula2 = 0.15915494331821423 + 2.4744729954163025e-10im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -3.2745508738969175e-10 + 7.227424947348391e-11im
Formula2 = -3.2745508738969175e-10 + 7.2274249473484e-11im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 1.0113620761135464e-10 - 3.197215490146684e-10im
Formula2 = 1.0113620761135468e-10 - 3.197215490146684e-10im
-----------------------------------------------------------------
=================================================================
i = 85
lambda = 45.77471531026693 - 24.00911321470669im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494309189535 - 1.6940658945086007e-21im
Formula2 = 0.15915494309189535 - 3.308722450212111e-24im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 1.625614788491638e-34 - 1.5013556590472107e-34im
Formula2 = 1.6256147884916344e-34 - 1.501355659047206e-34im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 4.874047466045942e-35 + 2.158501533125031e-34im
Formula2 = 4.87404746604591e-35 + 2.1585015331250254e-34im
-----------------------------------------------------------------
=================================================================
i = 86
lambda = 13.36371754612582 - 27.566529207151902im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494309189535 - 1.6940658945086007e-21im
Formula2 = 0.15915494309189535 - 5.082197683525802e-21im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 1.2769485692613018e-24 + 1.0456634401790075e-24im
Formula2 = 1.276948569261298e-24 + 1.0456634401790005e-24im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -1.5440453876343008e-24 + 5.830381802169766e-25im
Formula2 = -1.5440453876342931e-24 + 5.830381802169763e-25im
-----------------------------------------------------------------
=================================================================
i = 87
lambda = 42.53878671587144 - 3.5335744521453023im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494309189535 + 1.2705494208814505e-21im
Formula2 = 0.15915494309189535
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 3.904521795200594e-20 - 6.93078543631083e-20im
Formula2 = 3.904521795200591e-20 - 6.930785436310814e-20im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 4.0499753584240973e-20 + 6.846807782429149e-20im
Formula2 = 4.049975358424082e-20 + 6.84680778242914e-20im
-----------------------------------------------------------------
=================================================================
i = 88
lambda = -42.25046435991309 - 34.515091671819405im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494309189535 + 8.470329472543003e-22im
Formula2 = 0.15915494309189535 - 3.3881317890172014e-21im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -6.7032112788085025e-40 + 1.714471985966822e-41im
Formula2 = -6.703211278808526e-40 + 1.7144719859669104e-41im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 3.2031280100118474e-40 - 5.890874853680878e-40im
Formula2 = 3.203128010011853e-40 - 5.890874853680901e-40im
-----------------------------------------------------------------
=================================================================
i = 89
lambda = 3.9279226197884896 + 21.511363584757873im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 4.031883860713804e-15 + 4.6099985899422074e-14im
Formula2 = 4.031883860713842e-15 + 4.609998589942191e-14im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.07957747154590569 - 0.1378322238554676im
Formula2 = 0.07957747154590575 - 0.1378322238554676im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.07957747154598563 + 0.13783222385542143im
Formula2 = 0.07957747154598555 + 0.1378322238554215im
-----------------------------------------------------------------
=================================================================
i = 90
lambda = -44.93019368112381 + 30.984299580783613im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -3.9803946156573965e-5 - 7.219913607417265e-5im
Formula2 = -3.980394615657394e-5 - 7.219913607417336e-5im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.07965989980499744 - 0.1378305955159534im
Formula2 = 0.0796598998049975 - 0.13783059551595342im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.07953484723305448 + 0.1379027946520275im
Formula2 = 0.0795348472330544 + 0.1379027946520276im
-----------------------------------------------------------------
=================================================================
i = 91
lambda = 21.335662459482336 - 25.513654714527245im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494309189535
Formula2 = 0.15915494309189535 + 3.3881317890172014e-21im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 3.1899866723716647e-26 - 1.673911345217754e-26im
Formula2 = 3.1899866723716676e-26 - 1.6739113452177627e-26im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -1.4534358754427297e-27 + 3.5995651686165254e-26im
Formula2 = -1.4534358754426863e-27 + 3.599565168616532e-26im
-----------------------------------------------------------------
=================================================================
i = 92
lambda = -11.37488604675223 + 35.32612665670989im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 2.5507897375174256e-20 + 1.4450639731994013e-20im
Formula2 = 2.5507897375174466e-20 + 1.4450639731994215e-20im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.07957747154594763 - 0.13783222385544802im
Formula2 = 0.0795774715459477 - 0.13783222385544805im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.07957747154594771 + 0.13783222385544797im
Formula2 = 0.07957747154594765 + 0.13783222385544805im
-----------------------------------------------------------------
=================================================================
i = 93
lambda = -19.83171616404704 + 19.97542462064665im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 1.9195804938773052e-7 + 4.0094918452490405e-7im
Formula2 = 1.91958049387729e-7 + 4.0094918452490706e-7im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.07957702833474352 - 0.13783225808949306im
Formula2 = 0.07957702833474357 - 0.13783225808949306im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.07957772279910245 + 0.13783185714030846im
Formula2 = 0.07957772279910237 + 0.13783185714030854im
-----------------------------------------------------------------
=================================================================
i = 94
lambda = -8.149613643474218 - 45.00243008494971im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494309189535
Formula2 = 0.15915494309189535 - 1.6940658945086007e-21im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 5.569007358562578e-34 - 3.5608370901015465e-34im
Formula2 = 5.569007358562572e-34 - 3.5608370901015546e-34im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 2.992716994845096e-35 + 6.60332039142844e-34im
Formula2 = 2.992716994845172e-35 + 6.603320391428438e-34im
-----------------------------------------------------------------
=================================================================
i = 95
lambda = 36.4860774237779 - 9.092668192609807im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494309189535 - 3.8116482626443515e-21im
Formula2 = 0.15915494309189535 - 5.082197683525802e-21im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 3.465447567261033e-21 + 9.563130331878548e-22im
Formula2 = 3.465447567261066e-21 + 9.563130331878682e-22im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -2.560915164341349e-21 + 2.5230091121371094e-21im
Formula2 = -2.5609151643413777e-21 + 2.5230091121371305e-21im
-----------------------------------------------------------------
=================================================================
i = 96
lambda = 21.603649307514132 - 36.69536162085045im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494309189535
Formula2 = 0.15915494309189535
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -1.202695327883275e-33 + 8.702129337645374e-34im
Formula2 = -1.2026953278832727e-33 + 8.702129337645273e-34im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -1.5227884340023738e-34 - 1.4766711738420396e-33im
Formula2 = -1.5227884340022902e-34 - 1.4766711738420326e-33im
-----------------------------------------------------------------
=================================================================
i = 97
lambda = -10.16724982836579 + 40.5970364683824im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -2.3479276309643563e-24 - 2.981596019748283e-24im
Formula2 = -2.347927630964327e-24 - 2.9815960197482704e-24im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.07957747154594763 - 0.13783222385544802im
Formula2 = 0.0795774715459477 - 0.13783222385544805im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.07957747154594771 + 0.13783222385544797im
Formula2 = 0.07957747154594765 + 0.13783222385544805im
-----------------------------------------------------------------
=================================================================
i = 98
lambda = 37.706845394476744 - 16.410776456964513im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494309189535
Formula2 = 0.15915494309189535
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 1.3517842203946858e-27 - 2.1298992327283335e-26im
Formula2 = 1.3517842203946487e-27 - 2.1298992327283332e-26im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 1.776957632023987e-26 + 1.1820175638938404e-26im
Formula2 = 1.776957632023988e-26 + 1.1820175638938375e-26im
-----------------------------------------------------------------
=================================================================
i = 99
lambda = 40.865978446462265 - 16.47808300646973im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.15915494309189535 + 8.470329472543003e-22im
Formula2 = 0.15915494309189535 - 3.3881317890172014e-21im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 1.2451633390941846e-27 + 1.1910079158263787e-28im
Formula2 = 1.2451633390941853e-27 + 1.1910079158263323e-28im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -7.257259806684922e-28 + 1.0187926877253023e-27im
Formula2 = -7.257259806684889e-28 + 1.0187926877253048e-27im
-----------------------------------------------------------------
=================================================================
i = 100
lambda = -16.59102687125329 + 40.30287245679122im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 8.975031488836144e-22 + 1.2487244652123395e-21im
Formula2 = 8.97503148883601e-22 + 1.24872446521234e-21im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.07957747154594763 - 0.13783222385544802im
Formula2 = 0.0795774715459477 - 0.13783222385544805im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.07957747154594771 + 0.13783222385544797im
Formula2 = 0.07957747154594765 + 0.13783222385544805im
-----------------------------------------------------------------
=================================================================
Out[191]:
true
In [192]:
test_formula(FMinusFormula, FMinusSymGeneric)
i = 1
lambda = -20.07751083748721 - 17.71919435613534im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 5.1445101472493215e-21 + 1.1728198860875998e-20im
Formula2 = 5.144510147249354e-21 + 1.1728198860876025e-20im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -1.272917322777899e-20 - 1.4088229528932608e-21im
Formula2 = -1.2729173227779033e-20 - 1.4088229528932497e-21im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 7.584663080529663e-21 - 1.0319375907982737e-20im
Formula2 = 7.584663080529678e-21 - 1.0319375907982775e-20im
-----------------------------------------------------------------
=================================================================
i = 2
lambda = 48.479497902931826 + 49.33562602604671im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.15915494309189587 - 1.9059605036266837e-15im
Formula2 = -0.15915494309189587 - 1.905961350659631e-15im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.07957747154594955 - 0.13783222385544752im
Formula2 = 0.0795774715459496 - 0.13783222385544755im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.07957747154594633 + 0.13783222385544938im
Formula2 = 0.07957747154594626 + 0.13783222385544944im
-----------------------------------------------------------------
=================================================================
i = 3
lambda = 44.42746747375426 - 10.157085145873836im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 7.275191429611537e-25 - 1.850240127893462e-25im
Formula2 = 7.275191429611514e-25 - 1.8502401278934555e-25im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -2.03524076094866e-25 + 7.22562065938515e-25im
Formula2 = -2.0352407609486566e-25 + 7.225620659385128e-25im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -5.239950668662877e-25 - 5.375380531491685e-25im
Formula2 = -5.239950668662857e-25 - 5.375380531491672e-25im
-----------------------------------------------------------------
=================================================================
i = 4
lambda = 22.450108212976573 - 46.11875087877666im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 2.6724413246719794e-40 + 4.438791519696622e-40im
Formula2 = 2.6724413246719814e-40 + 4.43879151969657e-40im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -5.180326880496198e-40 + 9.500631744096116e-42im
Formula2 = -5.180326880496156e-40 + 9.500631744098735e-42im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 2.507885555824217e-40 - 4.533797837137582e-40im
Formula2 = 2.507885555824175e-40 - 4.533797837137558e-40im
-----------------------------------------------------------------
=================================================================
i = 5
lambda = -33.59002832945821 + 37.04889523051966im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.1591549430923801 - 1.2806255723560572e-13im
Formula2 = -0.1591549430923801 - 1.2806255808263866e-13im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.07957747154630092 - 0.1378322238558038im
Formula2 = 0.07957747154630097 - 0.13783222385580382im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.07957747154607919 + 0.1378322238559318im
Formula2 = 0.07957747154607911 + 0.13783222385593188im
-----------------------------------------------------------------
=================================================================
i = 6
lambda = 42.04131789714896 + 34.419561337711784im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.1591549136502462 + 2.5656450941445588e-8im
Formula2 = -0.1591549136502462 + 2.565645094144474e-8im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.07957743460598478 - 0.13783221118645742im
Formula2 = 0.07957743460598483 - 0.13783221118645742im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.07957747904426143 + 0.1378321855300064im
Formula2 = 0.07957747904426135 + 0.13783218553000648im
-----------------------------------------------------------------
=================================================================
i = 7
lambda = -43.59968978480428 + 15.928998440324534im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -1.3995626320218064e-7 + 5.79492316406291e-8im
Formula2 = -1.399562632021801e-7 + 5.7949231640629556e-8im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 1.9792624870516496e-8 - 1.501802951721442e-7im
Formula2 = 1.9792624870515883e-8 - 1.50180295172144e-7im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 1.2016363833166414e-7 + 9.223106353151504e-8im
Formula2 = 1.2016363833166422e-7 + 9.223106353151445e-8im
-----------------------------------------------------------------
=================================================================
i = 8
lambda = 8.196202129421422 + 13.71511685809135im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.15915484832628035 + 2.0276538874068225e-7im
Formula2 = -0.15915484832628035 + 2.027653887406814e-7im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.07957724856316248 - 0.1378322431687124im
Formula2 = 0.07957724856316253 - 0.13783224316871243im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.07957759976311789 + 0.1378320404033236im
Formula2 = 0.0795775997631178 + 0.13783204040332367im
-----------------------------------------------------------------
=================================================================
i = 9
lambda = 21.832362140042207 + 3.6530940703681978im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -2.2354354658288691e-7 + 7.09910144873753e-8im
Formula2 = -2.235435465828867e-7 + 7.099101448737511e-8im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 5.029175130494728e-8 - 2.2908989743653777e-7im
Formula2 = 5.0291751304947413e-8 - 2.2908989743653753e-7im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 1.7325179527793964e-7 + 1.5809888294916237e-7im
Formula2 = 1.732517952779393e-7 + 1.5809888294916242e-7im
-----------------------------------------------------------------
=================================================================
i = 10
lambda = 17.213957616271088 - 7.684675380142103im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 3.9196855696152277e-13 + 3.5144443673489676e-13im
Formula2 = 3.9196855696152236e-13 + 3.5144443673489575e-13im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -5.003440887118949e-13 + 1.6373250944595819e-13im
Formula2 = -5.00344088711894e-13 + 1.637325094459583e-13im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 1.0837553175037196e-13 - 5.151769461808549e-13im
Formula2 = 1.0837553175037162e-13 - 5.151769461808541e-13im
-----------------------------------------------------------------
=================================================================
i = 11
lambda = -30.120746779439077 + 35.5186284103946im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.15915494309211137 - 1.1921068770120264e-13im
Formula2 = -0.15915494309211137 - 1.1921068770120264e-13im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.07957747154615888 - 0.1378322238555755im
Formula2 = 0.07957747154615895 - 0.1378322238555755im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.07957747154595249 + 0.13783222385569463im
Formula2 = 0.0795774715459524 + 0.1378322238556947im
-----------------------------------------------------------------
=================================================================
i = 12
lambda = 26.074127579289552 + 42.32582508767311im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.15915494309189535 + 1.7110065534536867e-19im
Formula2 = -0.15915494309189535 + 1.7025362239811437e-19im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.07957747154594763 - 0.13783222385544802im
Formula2 = 0.0795774715459477 - 0.13783222385544805im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.07957747154594771 + 0.13783222385544797im
Formula2 = 0.07957747154594765 + 0.13783222385544805im
-----------------------------------------------------------------
=================================================================
i = 13
lambda = -9.797415571857314 + 15.182724054157774im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.15915493378901144 + 9.866079224907308e-8im
Formula2 = -0.15915493378901144 + 9.866079224907308e-8im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.07957738145175323 - 0.13783226512931038im
Formula2 = 0.0795773814517533 - 0.13783226512931038im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.07957755233725822 + 0.13783216646851806im
Formula2 = 0.07957755233725815 + 0.13783216646851815im
-----------------------------------------------------------------
=================================================================
i = 14
lambda = -42.584132005467026 + 11.5768922703001im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -4.4087908066989265e-10 - 3.004917457038429e-10im
Formula2 = -4.408790806698952e-10 - 3.004917457038392e-10im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 4.806730257420077e-10 - 2.3156661100533454e-10im
Formula2 = 4.806730257420059e-10 - 2.3156661100533852e-10im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -3.9793945072114816e-11 + 5.320583567091773e-10im
Formula2 = -3.979394507211072e-11 + 5.320583567091777e-10im
-----------------------------------------------------------------
=================================================================
i = 15
lambda = -22.57036398667931 - 40.45958918942198im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -1.3908971304474816e-36 - 1.7925679393551575e-36im
Formula2 = -1.3908971304474741e-36 - 1.7925679393551772e-36im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 2.2478579387148298e-36 - 3.0826827934081907e-37im
Formula2 = 2.2478579387148442e-36 - 3.082682793408022e-37im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -8.569608082673475e-37 + 2.100836218695976e-36im
Formula2 = -8.569608082673699e-37 + 2.1008362186959795e-36im
-----------------------------------------------------------------
=================================================================
i = 16
lambda = 44.81396345691431 - 25.711916498857757im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 3.9425430467462874e-35 + 2.9911066564557662e-36im
Formula2 = 3.9425430467462874e-35 + 2.9911066564557936e-36im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -2.2303089583650856e-35 + 3.2647871011731966e-35im
Formula2 = -2.2303089583650893e-35 + 3.264787101173195e-35im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -1.7122340883812024e-35 - 3.563897766818772e-35im
Formula2 = -1.712234088381198e-35 - 3.5638977668187746e-35im
-----------------------------------------------------------------
=================================================================
i = 17
lambda = 2.0419368121218113 + 16.196120249303775im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.15915494306643072 + 8.242026039526756e-12im
Formula2 = -0.15915494306643072 + 8.242026038679723e-12im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.07957747152607751 - 0.13783222383751603im
Formula2 = 0.07957747152607758 - 0.13783222383751603im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.07957747154035322 + 0.13783222382927393im
Formula2 = 0.07957747154035313 + 0.13783222382927401im
-----------------------------------------------------------------
=================================================================
i = 18
lambda = -36.70485985081362 + 9.16712416081942im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 1.4837767765264684e-9 - 1.8051345650218677e-9im
Formula2 = 1.4837767765264584e-9 - 1.805134565021867e-9im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 8.214040022950762e-10 + 2.187555664528241e-9im
Formula2 = 8.214040022950803e-10 + 2.187555664528233e-9im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -2.305180778821544e-9 - 3.8242109950637263e-10im
Formula2 = -2.3051807788215388e-9 - 3.8242109950636585e-10im
-----------------------------------------------------------------
=================================================================
i = 19
lambda = -36.315801735984635 - 45.251463555087im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -1.1627476112527903e-45 + 1.153976879701567e-44im
Formula2 = -1.162747611252703e-45 + 1.1539768797015773e-44im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -9.412359126388166e-45 - 6.776853368042421e-45im
Formula2 = -9.412359126388302e-45 - 6.776853368042403e-45im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 1.0575106737640953e-44 - 4.76291542897325e-45im
Formula2 = 1.0575106737641004e-44 - 4.762915428973371e-45im
-----------------------------------------------------------------
=================================================================
i = 20
lambda = -24.488363536739556 + 39.87919253684392im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.15915494309189535 + 2.425902360936316e-18im
Formula2 = -0.15915494309189535 + 2.4242082950418076e-18im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.07957747154594763 - 0.13783222385544802im
Formula2 = 0.07957747154594769 - 0.13783222385544805im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.07957747154594773 + 0.13783222385544797im
Formula2 = 0.07957747154594765 + 0.13783222385544805im
-----------------------------------------------------------------
=================================================================
i = 21
lambda = 12.794289277924719 - 19.470084410061773im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 1.4445165418313389e-19 - 4.87359311685242e-19im
Formula2 = 1.4445165418313124e-19 - 4.873593116852414e-19im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 3.4983971759875094e-19 + 3.6877845798389954e-19im
Formula2 = 3.4983971759875176e-19 + 3.6877845798389713e-19im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -4.942913717818847e-19 + 1.185808537013426e-19im
Formula2 = -4.94291371781883e-19 + 1.185808537013443e-19im
-----------------------------------------------------------------
=================================================================
i = 22
lambda = -19.524756901962537 + 18.622255922550195im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.1591573472112376 + 9.741838489829087e-7im
Formula2 = -0.1591573472112376 + 9.741838489828968e-7im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.07957782993765758 - 0.13783479297579662im
Formula2 = 0.07957782993765765 - 0.13783479297579665im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.07957951727358002 + 0.1378338187919476im
Formula2 = 0.07957951727357994 + 0.13783381879194767im
-----------------------------------------------------------------
=================================================================
i = 23
lambda = 23.41857432946044 - 37.49069094309034im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -3.924107657989656e-36 - 9.34277387609294e-35im
Formula2 = -3.92410765798993e-36 - 9.342773876092973e-35im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 8.287284901409577e-35 + 4.331549246146058e-35im
Formula2 = 8.28728490140962e-35 + 4.331549246146054e-35im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -7.894874135610608e-35 + 5.011224629946883e-35im
Formula2 = -7.894874135610626e-35 + 5.011224629946918e-35im
-----------------------------------------------------------------
=================================================================
i = 24
lambda = 5.4002515506733175 - 38.95041467410813im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 1.5471369030331815e-30 + 6.260938483121847e-29im
Formula2 = 1.5471369030335426e-30 + 6.260938483121848e-29im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -5.499488623066788e-29 - 2.9964832554450103e-29im
Formula2 = -5.499488623066808e-29 - 2.9964832554449823e-29im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 5.344774932763466e-29 - 3.264455227676837e-29im
Formula2 = 5.344774932763453e-29 - 3.264455227676866e-29im
-----------------------------------------------------------------
=================================================================
i = 25
lambda = -42.55237771450191 + 11.220665320901603im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -3.1203025341826115e-10 - 7.706023496131729e-11im
Formula2 = -3.120302534182617e-10 - 7.706023496131548e-11im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 2.2275124780722905e-10 - 2.3169600872885172e-10im
Formula2 = 2.227512478072279e-10 - 2.3169600872885314e-10im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 8.927900561103218e-11 + 3.087562436901689e-10im
Formula2 = 8.927900561103385e-11 + 3.087562436901686e-10im
-----------------------------------------------------------------
=================================================================
i = 26
lambda = 0.5902781614080226 - 19.20844441919676im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -5.470181058947149e-15 - 3.6435839387617306e-14im
Formula2 = -5.470181058947255e-15 - 3.6435839387617274e-14im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 3.428945304735981e-14 + 1.3480603933459952e-14im
Formula2 = 3.428945304735984e-14 + 1.3480603933459859e-14im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -2.8819271988412645e-14 + 2.2955235454157356e-14im
Formula2 = -2.881927198841258e-14 + 2.2955235454157416e-14im
-----------------------------------------------------------------
=================================================================
i = 27
lambda = 27.55940876440657 + 23.994826823780073im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.15915478095921345 + 8.47528555760004e-7im
Formula2 = -0.15915478095921345 + 8.475285557600057e-7im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.07957665649834697 - 0.13783250720870463im
Formula2 = 0.07957665649834704 - 0.13783250720870463im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.07957812446086651 + 0.1378316596801488im
Formula2 = 0.07957812446086643 + 0.13783165968014888im
-----------------------------------------------------------------
=================================================================
i = 28
lambda = 25.963194060456615 - 21.74648406112474im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 1.8201869422707457e-25 - 3.975408795303009e-26im
Formula2 = 1.8201869422707505e-25 - 3.975408795302979e-26im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -5.658129704193228e-26 + 1.7750985714083358e-25im
Formula2 = -5.658129704193283e-26 + 1.7750985714083388e-25im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -1.254373971851423e-25 - 1.3775576918780343e-25im
Formula2 = -1.254373971851422e-25 - 1.3775576918780407e-25im
-----------------------------------------------------------------
=================================================================
i = 29
lambda = 34.17495596242759 + 19.410489990417474im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.05495321371432538 + 0.042816822950564805im
Formula2 = -0.05495321371432542 + 0.042816822950565006im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -0.009603849527367033 - 0.06899929057148359im
Formula2 = -0.00960384952736717 - 0.06899929057148374im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.0645570632416924 + 0.02618246762091875im
Formula2 = 0.0645570632416926 + 0.026182467620918734im
-----------------------------------------------------------------
=================================================================
i = 30
lambda = -46.764666100848 - 44.15232299448031im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 6.030545827494997e-48 - 3.7236156207510796e-48im
Formula2 = 6.030545827494982e-48 - 3.723615620751133e-48im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 2.094728077514998e-49 + 7.084413695672456e-48im
Formula2 = 2.0947280775155174e-49 + 7.084413695672472e-48im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -6.240018635246496e-48 - 3.3607980749213734e-48im
Formula2 = -6.240018635246534e-48 - 3.360798074921339e-48im
-----------------------------------------------------------------
=================================================================
i = 31
lambda = 1.5178238198862317 - 21.622809898924842im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 5.22384341999217e-17 - 3.5301610713514067e-16im
Formula2 = 5.22384341999207e-17 - 3.530161071351403e-16im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 2.7960169962416003e-16 + 2.2174786463862427e-16im
Formula2 = 2.7960169962416027e-16 + 2.2174786463862338e-16im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -3.318401338240816e-16 + 1.3126824249651645e-16im
Formula2 = -3.3184013382408095e-16 + 1.3126824249651694e-16im
-----------------------------------------------------------------
=================================================================
i = 32
lambda = 35.382289847342065 - 38.912481689958646im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 3.0392943811778688e-40 + 1.7503538325681155e-40im
Formula2 = 3.0392943811778924e-40 + 1.7503538325681082e-40im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -3.0354980752043757e-40 + 1.756929227395282e-40im
Formula2 = -3.0354980752043823e-40 + 1.7569292273953059e-40im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -3.796305973493937e-43 - 3.5072830599633965e-40im
Formula2 = -3.796305973509848e-43 - 3.507283059963414e-40im
-----------------------------------------------------------------
=================================================================
i = 33
lambda = -16.902657299788103 + 4.535524182921137im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -6.290386104601192e-5 + 2.4954860213494173e-6im
Formula2 = -6.290386104601185e-5 + 2.495486021349515e-6im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 2.9290776233728393e-5 - 5.5724084672647403e-5im
Formula2 = 2.9290776233728298e-5 - 5.5724084672647403e-5im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 3.361308481228353e-5 + 5.322859865129797e-5im
Formula2 = 3.361308481228355e-5 + 5.3228598651297885e-5im
-----------------------------------------------------------------
=================================================================
i = 34
lambda = 6.3587412733362 - 12.654976331318558im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -2.8803561858723936e-12 + 2.2958897804422794e-12im
Formula2 = -2.880356185872396e-12 + 2.295889780442275e-12im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -5.481207812158953e-13 - 3.642406519134285e-12im
Formula2 = -5.481207812158893e-13 - 3.642406519134286e-12im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 3.4284769670882883e-12 + 1.3465167386920038e-12im
Formula2 = 3.4284769670882854e-12 + 1.3465167386920106e-12im
-----------------------------------------------------------------
=================================================================
i = 35
lambda = -38.27636395798788 - 42.485071376588394im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 1.0080362004207847e-43 + 8.924278150555901e-44im
Formula2 = 1.0080362004207933e-43 + 8.924278150555891e-44im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -1.276883259092374e-43 + 4.2677104997094664e-44im
Formula2 = -1.2768832590923777e-43 + 4.267710499709544e-44im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 2.6884705867158873e-44 - 1.3191988650265364e-43im
Formula2 = 2.6884705867158444e-44 - 1.3191988650265434e-43im
-----------------------------------------------------------------
=================================================================
i = 36
lambda = -18.40519651256127 - 12.131456500522162im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -2.2381849790311017e-16 - 8.080957591829358e-17im
Formula2 = -2.2381849790311e-16 - 8.080957591829258e-17im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 1.8189239456584448e-16 - 1.5342771706182075e-16im
Formula2 = 1.8189239456584364e-16 - 1.5342771706182112e-16im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 4.192610333726573e-17 + 2.3423729298011424e-16im
Formula2 = 4.192610333726638e-17 + 2.342372929801137e-16im
-----------------------------------------------------------------
=================================================================
i = 37
lambda = 43.902567908581176 - 17.273679842699877im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 2.4984709069950209e-29 + 1.110579252650353e-29im
Formula2 = 2.4984709069950262e-29 + 1.1105792526503456e-29im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -2.211025299208652e-29 + 1.6084496497488593e-29im
Formula2 = -2.2110252992086492e-29 + 1.6084496497488678e-29im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -2.874456077863695e-30 - 2.719028902399212e-29im
Formula2 = -2.8744560778637688e-30 - 2.7190289023992135e-29im
-----------------------------------------------------------------
=================================================================
i = 38
lambda = 9.997964963959902 + 47.156740737302556im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.15915494309189535
Formula2 = -0.15915494309189535 - 8.470329472543003e-22im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.07957747154594763 - 0.13783222385544802im
Formula2 = 0.0795774715459477 - 0.13783222385544805im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.07957747154594771 + 0.13783222385544797im
Formula2 = 0.07957747154594765 + 0.13783222385544805im
-----------------------------------------------------------------
=================================================================
i = 39
lambda = -9.673121305029419 + 44.97765991293899im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.15915494309189535
Formula2 = -0.15915494309189535 - 8.470329472543003e-22im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.07957747154594763 - 0.13783222385544802im
Formula2 = 0.0795774715459477 - 0.13783222385544805im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.07957747154594771 + 0.13783222385544797im
Formula2 = 0.07957747154594765 + 0.13783222385544805im
-----------------------------------------------------------------
=================================================================
i = 40
lambda = 45.1139965507854 - 6.325771943294669im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -1.4958270074216114e-23 + 1.2888888490333498e-22im
Formula2 = -1.495827007421554e-23 + 1.2888888490333606e-22im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -1.0414191355462868e-22 - 7.739868433260716e-23im
Formula2 = -1.041419135546299e-22 - 7.739868433260725e-23im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 1.1910018362884475e-22 - 5.1490200570727846e-23im
Formula2 = 1.1910018362884545e-22 - 5.1490200570728816e-23im
-----------------------------------------------------------------
=================================================================
i = 41
lambda = -22.299896300790945 + 42.29290915795714im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.15915494309189535 - 1.6940658945086007e-21im
Formula2 = -0.15915494309189535 - 8.470329472543003e-22im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.07957747154594763 - 0.13783222385544802im
Formula2 = 0.0795774715459477 - 0.13783222385544805im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.07957747154594771 + 0.13783222385544797im
Formula2 = 0.07957747154594765 + 0.13783222385544805im
-----------------------------------------------------------------
=================================================================
i = 42
lambda = -45.34826842539408 + 6.568602319901615im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -2.4428926033146008e-14 - 1.0534916690921252e-14im
Formula2 = -2.442892603314598e-14 - 1.0534916690921155e-14im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 2.1337968497663498e-14 - 1.5888612186414837e-14im
Formula2 = 2.133796849766341e-14 - 1.5888612186414856e-14im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 3.090957535482516e-15 + 2.6423528877336078e-14im
Formula2 = 3.0909575354825684e-15 + 2.6423528877336012e-14im
-----------------------------------------------------------------
=================================================================
i = 43
lambda = -26.55352678321028 + 25.491643096091266im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.15915492814477095 - 3.520067970839877e-8im
Formula2 = -0.15915492814477095 - 3.520067970839877e-8im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.07957749455706829 - 0.13783219331051874im
Formula2 = 0.07957749455706836 - 0.13783219331051874im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.07957743358770267 + 0.1378322285111984im
Formula2 = 0.07957743358770258 + 0.13783222851119845im
-----------------------------------------------------------------
=================================================================
i = 44
lambda = 16.69182540003176 - 48.769822629232436im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 1.1709523438800818e-39 - 8.083169567007664e-40im
Formula2 = 1.1709523438800634e-39 - 8.08316956700769e-40im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 1.1454684687254932e-40 + 1.4182329547714659e-39im
Formula2 = 1.1454684687256031e-40 + 1.4182329547714515e-39im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -1.2854991907526309e-39 - 6.099159980706988e-40im
Formula2 = -1.2854991907526237e-39 - 6.099159980706826e-40im
-----------------------------------------------------------------
=================================================================
i = 45
lambda = 48.64791433418657 + 29.825492609179506im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.14881485695552374 + 0.003661579272246457im
Formula2 = -0.1488148569555237 + 0.003661579272246401im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.07123640781002587 - 0.13070823622015415im
Formula2 = 0.07123640781002595 - 0.13070823622015412im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.07757844914549789 + 0.12704665694790765im
Formula2 = 0.07757844914549775 + 0.1270466569479077im
-----------------------------------------------------------------
=================================================================
i = 46
lambda = 33.72825850236603 + 27.29964177055942im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.1591541855944772 + 1.0172700476147467e-6im
Formula2 = -0.1591541855944772 + 1.0172700476147433e-6im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.07957621181553483 - 0.13783207647846443im
Formula2 = 0.07957621181553488 - 0.13783207647846443im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.07957797377894239 + 0.13783105920841673im
Formula2 = 0.07957797377894232 + 0.13783105920841682im
-----------------------------------------------------------------
=================================================================
i = 47
lambda = -49.98705731617237 + 24.04977483257467im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.00010197132392501045 + 5.7533043426012785e-5im
Formula2 = 0.00010197132392501019 + 5.7533043426011843e-5im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -0.00010081073912646556 + 5.954323526358458e-5im
Formula2 = -0.00010081073912646467 + 5.954323526358483e-5im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -1.1605847985449082e-6 - 0.00011707627868959733im
Formula2 = -1.1605847985455183e-6 - 0.00011707627868959667im
-----------------------------------------------------------------
=================================================================
i = 48
lambda = 16.34069768329134 + 2.511863851804087im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 4.305340094946594e-6 - 2.388263153884552e-6im
Formula2 = 4.3053400949465916e-6 - 2.3882631538845414e-6im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -8.437348528692965e-8 + 4.922665471097733e-6im
Formula2 = -8.437348528693943e-8 + 4.922665471097727e-6im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -4.2209666096596636e-6 - 2.534402317213179e-6im
Formula2 = -4.2209666096596525e-6 - 2.534402317213186e-6im
-----------------------------------------------------------------
=================================================================
i = 49
lambda = 25.410508216216726 + 6.631694991826052im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 3.593643781863157e-7 + 8.493255541929681e-7im
Formula2 = 3.5936437818631327e-7 + 8.493255541929662e-7im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -9.152196951075652e-7 - 1.1344409637193603e-7im
Formula2 = -9.152196951075625e-7 - 1.1344409637193754e-7im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 5.558553169212491e-7 - 7.35881457821032e-7im
Formula2 = 5.558553169212493e-7 - 7.358814578210287e-7im
-----------------------------------------------------------------
=================================================================
i = 50
lambda = 18.872418979303802 + 14.412047493006526im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.15878130377130906 - 0.0007224988450526278im
Formula2 = -0.15878130377130906 - 0.0007224988450526285im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.08001635423967499 - 0.13714739328944123im
Formula2 = 0.08001635423967504 - 0.13714739328944126im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.07876494953163408 + 0.1378698921344938im
Formula2 = 0.078764949531634 + 0.13786989213449388im
-----------------------------------------------------------------
=================================================================
i = 51
lambda = -31.9799458099312 + 36.30390712150928im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.15915494309152114 + 6.692630594141123e-14im
Formula2 = -0.15915494309152114 + 6.692630509437828e-14im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.07957747154570258 - 0.13783222385515745im
Formula2 = 0.07957747154570265 - 0.13783222385515745im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.0795774715458186 + 0.13783222385509045im
Formula2 = 0.07957747154581851 + 0.13783222385509053im
-----------------------------------------------------------------
=================================================================
i = 52
lambda = 20.718050852911702 - 23.92384317967682im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -6.633720708183405e-25 - 7.565480034688557e-26im
Formula2 = -6.63372070818343e-25 - 7.565480034688596e-26im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 3.972050144278127e-25 - 5.3666966531632975e-25im
Formula2 = 3.972050144278146e-25 - 5.366696653163318e-25im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 2.661670563905278e-25 + 6.123244656632151e-25im
Formula2 = 2.6616705639052836e-25 + 6.123244656632178e-25im
-----------------------------------------------------------------
=================================================================
i = 53
lambda = -4.386026523273486 + 6.707936733247102im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.1592571217780548 - 0.0002854286330624909im
Formula2 = -0.1592571217780548 - 0.0002854286330624912im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.07987574933622694 - 0.13777799887685618im
Formula2 = 0.07987574933622701 - 0.1377779988768562im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.07938137244182787 + 0.13806342750991862im
Formula2 = 0.07938137244182779 + 0.1380634275099187im
-----------------------------------------------------------------
=================================================================
i = 54
lambda = 5.227919850880404 + 2.0526338398191513im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.024469090394398728 - 0.020633583859515116im
Formula2 = -0.024469090394398697 - 0.020633583859515088im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.030103752990656013 - 0.010874061959289536im
Formula2 = 0.03010375299065599 - 0.010874061959289517im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -0.005634662596257275 + 0.03150764581880464im
Formula2 = -0.00563466259625729 + 0.03150764581880461im
-----------------------------------------------------------------
=================================================================
i = 55
lambda = -6.649762936047068 - 13.759873046636088im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -5.394354192239308e-13 - 8.298877643308108e-14im
Formula2 = -5.394354192239302e-13 - 8.298877643308075e-14im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 3.415880982320008e-13 - 4.256703885324921e-13im
Formula2 = 3.4158809823200047e-13 - 4.256703885324918e-13im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 1.9784732099193005e-13 + 5.08659164965573e-13im
Formula2 = 1.9784732099192974e-13 + 5.086591649655726e-13im
-----------------------------------------------------------------
=================================================================
i = 56
lambda = 26.755706497492866 + 36.48045024849462im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.15915494309189535 - 3.1623788738490907e-15im
Formula2 = -0.15915494309189535 - 3.1623780268161435e-15im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.07957747154595038 - 0.13783222385544647im
Formula2 = 0.07957747154595045 - 0.13783222385544647im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.079577471545945 + 0.13783222385544955im
Formula2 = 0.07957747154594491 + 0.13783222385544963im
-----------------------------------------------------------------
=================================================================
i = 57
lambda = -28.726463228810672 + 32.812143585663065im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.15915494309285821 + 4.165112966846149e-12im
Formula2 = -0.15915494309285821 + 4.165112966846149e-12im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.07957747154282198 - 0.13783222385836447im
Formula2 = 0.07957747154282205 - 0.13783222385836447im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.07957747155003625 + 0.1378322238541993im
Formula2 = 0.07957747155003618 + 0.13783222385419935im
-----------------------------------------------------------------
=================================================================
i = 58
lambda = 47.62938481424111 - 48.625142039670365im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -4.087449359988846e-51 + 4.879632180648834e-53im
Formula2 = -4.087449359988816e-51 + 4.87963218065303e-53im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 2.0014658256987628e-51 - 3.56423314333603e-51im
Formula2 = 2.001465825698713e-51 - 3.564233143336026e-51im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 2.0859835342900838e-51 + 3.51543682152954e-51im
Formula2 = 2.085983534290103e-51 + 3.515436821529495e-51im
-----------------------------------------------------------------
=================================================================
i = 59
lambda = -13.917883620325291 + 13.645946328567462im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.1591892427051543 + 8.084892698687743e-6im
Formula2 = -0.1591892427051543 + 8.084892698687735e-6im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.07958761963011318 - 0.13786597063821962im
Formula2 = 0.07958761963011324 - 0.13786597063821962im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.07960162307504114 + 0.13785788574552085im
Formula2 = 0.07960162307504105 + 0.13785788574552094im
-----------------------------------------------------------------
=================================================================
i = 60
lambda = 49.45706284037273 - 27.910464560072647im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 7.05536852527397e-39 + 2.5243381553143087e-38im
Formula2 = 7.055368525273921e-39 + 2.524338155314321e-38im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -2.5389093965082377e-38 - 6.511562400623129e-39im
Formula2 = -2.5389093965082466e-38 - 6.511562400623243e-39im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 1.8333725439808397e-38 - 1.873181915251996e-38im
Formula2 = 1.8333725439808546e-38 - 1.873181915251997e-38im
-----------------------------------------------------------------
=================================================================
i = 61
lambda = 3.8417407843131173 - 14.140284896831702im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 1.1200971599558497e-12 + 3.326125443720869e-12im
Formula2 = 1.120097159955847e-12 + 3.3261254437208618e-12im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -3.4405577104139857e-12 - 6.930301266318659e-13im
Formula2 = -3.4405577104139785e-12 - 6.930301266318659e-13im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 2.3204605504581344e-12 - 2.633095317089003e-12im
Formula2 = 2.3204605504581315e-12 - 2.6330953170889956e-12im
-----------------------------------------------------------------
=================================================================
i = 62
lambda = -22.93611994271194 - 46.927135254934726im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 5.466501620103138e-41 - 8.512141150968457e-41im
Formula2 = 5.466501620103114e-41 - 8.512141150968556e-41im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 4.638479667286027e-41 + 8.990199848322335e-41im
Formula2 = 4.638479667286124e-41 + 8.990199848322368e-41im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -1.0104981287389163e-40 - 4.780586973538749e-42im
Formula2 = -1.0104981287389238e-40 - 4.780586973538115e-42im
-----------------------------------------------------------------
=================================================================
i = 63
lambda = 7.587694744964793 + 18.88421712409827im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.1591549430927448 - 5.670395323432835e-11im
Formula2 = -0.1591549430927448 - 5.670395323517538e-11im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.07957747159547944 - 0.13783222382783172im
Formula2 = 0.0795774715954795 - 0.13783222382783172im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.07957747149726539 + 0.13783222388453562im
Formula2 = 0.07957747149726532 + 0.1378322238845357im
-----------------------------------------------------------------
=================================================================
i = 64
lambda = 19.547537569011524 + 18.244699704425415im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.15915958451901602 - 4.290991141168675e-7im
Formula2 = -0.15915958451901602 - 4.2909911411686663e-7im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.07958016387024153 - 0.13783602889968727im
Formula2 = 0.0795801638702416 - 0.1378360288996873im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.07957942064877449 + 0.13783645799880134im
Formula2 = 0.07957942064877441 + 0.1378364579988014im
-----------------------------------------------------------------
=================================================================
i = 65
lambda = -46.503208156312596 + 25.378932034696675im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.01480440901070836 + 0.005895154123286737im
Formula2 = -0.014804409010708232 + 0.005895154123286795im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.002296851275363282 - 0.015768571352932057im
Formula2 = 0.0022968512753631723 - 0.01576857135293198im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.012507557735345079 + 0.009873417229645316im
Formula2 = 0.01250755773534506 + 0.009873417229645184im
-----------------------------------------------------------------
=================================================================
i = 66
lambda = 42.58132043471289 + 11.331217404197425im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -3.4341768906323113e-10 + 1.3767304117176593e-10im
Formula2 = -3.4341768906323097e-10 + 1.3767304117176942e-10im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 5.2480493460605245e-11 - 3.662449634235865e-10im
Formula2 = 5.248049346060226e-11 - 3.662449634235882e-10im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 2.9093719560262584e-10 + 2.285719222518204e-10im
Formula2 = 2.9093719560262873e-10 + 2.2857192225181878e-10im
-----------------------------------------------------------------
=================================================================
i = 67
lambda = 24.983476798160837 + 19.917103854273094im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.15911444477233783 + 1.1190370285057615e-5im
Formula2 = -0.15911444477233783 + 1.11903702850574e-5im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.07954753124122427 - 0.13780274646704316im
Formula2 = 0.07954753124122432 - 0.13780274646704319im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.07956691353111359 + 0.13779155609675806im
Formula2 = 0.0795669135311135 + 0.13779155609675814im
-----------------------------------------------------------------
=================================================================
i = 68
lambda = -38.76308749726589 - 29.92819701763658im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 1.2996804259346488e-35 - 3.140226788055134e-36im
Formula2 = 1.2996804259346514e-35 - 3.1402267880552856e-36im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -3.778885957573083e-36 + 1.2825676050635422e-35im
Formula2 = -3.778885957572969e-36 + 1.2825676050635524e-35im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -9.217918301773405e-36 - 9.685449262580282e-36im
Formula2 = -9.217918301773546e-36 - 9.685449262580237e-36im
-----------------------------------------------------------------
=================================================================
i = 69
lambda = 49.57675891676108 - 38.19736637997646im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -3.872438124984159e-45 - 2.6643887751290032e-45im
Formula2 = -3.8724381249841423e-45 - 2.664388775129022e-45im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 4.2436474273119e-45 - 2.02143540325516e-45im
Formula2 = 4.243647427311909e-45 - 2.0214354032551356e-45im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -3.712093023277394e-46 + 4.685824178384162e-45im
Formula2 = -3.712093023277671e-46 + 4.6858241783841575e-45im
-----------------------------------------------------------------
=================================================================
i = 70
lambda = 45.66100599100858 + 12.928961295696276im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -2.8085956834005034e-10 + 2.8549935394404607e-11im
Formula2 = -2.808595683400511e-10 + 2.8549935394406174e-11im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 1.1570481484206622e-10 - 2.5750648877561755e-10im
Formula2 = 1.1570481484206536e-10 - 2.5750648877561905e-10im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 1.6515475349798415e-10 + 2.2895655338121283e-10im
Formula2 = 1.6515475349798578e-10 + 2.2895655338121288e-10im
-----------------------------------------------------------------
=================================================================
i = 71
lambda = -25.35244154611953 - 20.585551288490823im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 1.72107370438468e-24 + 5.405072346698222e-25im
Formula2 = 1.7210737043846772e-24 + 5.405072346698145e-25im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -1.3286298483456827e-24 + 1.2202399324476114e-24im
Formula2 = -1.3286298483456754e-24 + 1.2202399324476126e-24im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -3.924438560389977e-25 - 1.760747167117433e-24im
Formula2 = -3.9244385603900175e-25 - 1.760747167117427e-24im
-----------------------------------------------------------------
=================================================================
i = 72
lambda = 35.07364501210435 - 33.94414409595472im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -7.778664756678573e-37 + 1.3803916460642054e-37im
Formula2 = -7.778664756678571e-37 + 1.380391646064176e-37im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 2.693878145675865e-37 - 7.4267171098384455e-37im
Formula2 = 2.6938781456758924e-37 - 7.4267171098384305e-37im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 5.084786611002707e-37 + 6.046325463774237e-37im
Formula2 = 5.084786611002678e-37 + 6.0463254637742546e-37im
-----------------------------------------------------------------
=================================================================
i = 73
lambda = 25.183705325641398 + 4.283298702645411im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -3.0482374255591995e-8 - 1.2992015469643426e-8im
Formula2 = -3.048237425559199e-8 - 1.2992015469643421e-8im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 2.6492602570867612e-8 - 1.9902502738185726e-8im
Formula2 = 2.649260257086762e-8 - 1.990250273818572e-8im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 3.98977168472439e-9 + 3.289451820782914e-8im
Formula2 = 3.989771684724369e-9 + 3.2894518207829145e-8im
-----------------------------------------------------------------
=================================================================
i = 74
lambda = -1.2620237152942693 + 0.8783143352663032im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.08920943805490404 + 0.07204155825466492im
Formula2 = -0.08920943805490406 + 0.07204155825466498im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -0.017785100549304354 - 0.11327841874021359im
Formula2 = -0.01778510054930436 - 0.11327841874021366im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.10699453860420838 + 0.04123686048554863im
Formula2 = 0.1069945386042084 + 0.041236860485548685im
-----------------------------------------------------------------
=================================================================
i = 75
lambda = 44.73035759148614 + 15.374566820825564im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -1.6838641513006276e-8 + 1.8165574325536416e-8im
Formula2 = -1.68386415130063e-8 + 1.8165574325536277e-8im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -7.312528083745771e-9 - 2.3665478478250876e-8im
Formula2 = -7.312528083745636e-9 - 2.3665478478250837e-8im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 2.4151169596752042e-8 + 5.499904152714454e-9im
Formula2 = 2.4151169596751936e-8 + 5.499904152714559e-9im
-----------------------------------------------------------------
=================================================================
i = 76
lambda = -42.05625515323472 - 9.74145289226378im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -1.0711409695007e-23 - 2.101860406149703e-24im
Formula2 = -1.0711409695007048e-23 - 2.1018604061496255e-24im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 7.17596935443782e-24 - 8.225422703144138e-24im
Formula2 = 7.17596935443778e-24 - 8.225422703144219e-24im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 3.5354403405691834e-24 + 1.0327283109293836e-23im
Formula2 = 3.5354403405692686e-24 + 1.0327283109293844e-23im
-----------------------------------------------------------------
=================================================================
i = 77
lambda = -17.345563753796903 + 14.97411648542601im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.15924582974307666 + 2.2255090064251863e-5im
Formula2 = -0.15924582974307666 + 2.2255090064252093e-5im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.07960364139817913 - 0.13792206154926806im
Formula2 = 0.0796036413981792 - 0.1379220615492681im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.07964218834489753 + 0.13789980645920374im
Formula2 = 0.07964218834489745 + 0.13789980645920383im
-----------------------------------------------------------------
=================================================================
i = 78
lambda = -3.077862922213903 - 28.221415760610302im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -1.9682846489542963e-21 - 4.102151949979621e-21im
Formula2 = -1.9682846489542997e-21 - 4.102151949979612e-21im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 4.536710123343372e-21 + 3.4649146711645307e-22im
Formula2 = 4.536710123343367e-21 + 3.464914671164471e-22im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -2.568425474389074e-21 + 3.755660482863168e-21im
Formula2 = -2.568425474389067e-21 + 3.755660482863165e-21im
-----------------------------------------------------------------
=================================================================
i = 79
lambda = -21.06864553860992 + 45.67569490020074im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.15915494309189535
Formula2 = -0.15915494309189535
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.07957747154594763 - 0.13783222385544802im
Formula2 = 0.0795774715459477 - 0.13783222385544805im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.07957747154594771 + 0.13783222385544797im
Formula2 = 0.07957747154594765 + 0.13783222385544805im
-----------------------------------------------------------------
=================================================================
i = 80
lambda = 5.3043314198227804 + 24.772085419331134im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.1591549430918942 + 1.0097479764218514e-16im
Formula2 = -0.1591549430918942 + 1.0097479764218514e-16im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.07957747154594698 - 0.13783222385544708im
Formula2 = 0.07957747154594703 - 0.1378322238554471im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.07957747154594724 + 0.1378322238554469im
Formula2 = 0.07957747154594716 + 0.137832223855447im
-----------------------------------------------------------------
=================================================================
i = 81
lambda = 4.2553109736520796 - 40.13695047944004im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -1.1660135136464744e-29 - 2.5994434140063546e-29im
Formula2 = -1.166013513646466e-29 - 2.599443414006346e-29im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 2.83419078905289e-29 + 2.899243830293766e-30im
Formula2 = 2.834190789052879e-29 + 2.8992438302938045e-30im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -1.6681772754064144e-29 + 2.3095190309769776e-29im
Formula2 = -1.668177275406413e-29 + 2.3095190309769656e-29im
-----------------------------------------------------------------
=================================================================
i = 82
lambda = 4.514615668886954 - 37.791325015599895im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -2.2704354823144213e-28 + 7.329683433123484e-28im
Formula2 = -2.270435482314457e-28 + 7.329683433123536e-28im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -5.212474313625665e-28 - 5.631096521899604e-28im
Formula2 = -5.212474313625693e-28 - 5.631096521899664e-28im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 7.482909795940084e-28 - 1.6985869112238814e-28im
Formula2 = 7.48290979594015e-28 - 1.6985869112238718e-28im
-----------------------------------------------------------------
=================================================================
i = 83
lambda = 3.4187870375644636 + 40.64807791837224im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.15915494309189535 - 8.470329472543003e-22im
Formula2 = -0.15915494309189535
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.07957747154594763 - 0.13783222385544802im
Formula2 = 0.0795774715459477 - 0.13783222385544805im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.07957747154594771 + 0.13783222385544797im
Formula2 = 0.07957747154594765 + 0.13783222385544805im
-----------------------------------------------------------------
=================================================================
i = 84
lambda = -25.439209134314854 + 49.8734273426702im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.15915494309189535 - 8.470329472543003e-22im
Formula2 = -0.15915494309189535
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.07957747154594763 - 0.13783222385544802im
Formula2 = 0.0795774715459477 - 0.13783222385544805im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.07957747154594771 + 0.13783222385544797im
Formula2 = 0.07957747154594765 + 0.13783222385544805im
-----------------------------------------------------------------
=================================================================
i = 85
lambda = -7.762195371487543 - 15.622198261590505im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -1.2471625559337543e-14 - 2.6382450079696637e-15im
Formula2 = -1.2471625559337524e-14 - 2.638245007969645e-15im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 8.520599977977976e-15 - 9.48162205688879e-15im
Formula2 = 8.520599977977956e-15 - 9.481622056888784e-15im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 3.951025581359569e-15 + 1.2119867064858449e-14im
Formula2 = 3.9510255813595685e-15 + 1.2119867064858429e-14im
-----------------------------------------------------------------
=================================================================
i = 86
lambda = -47.48679670084237 - 43.262132207191485im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 3.842459000939099e-48 + 1.3892955572347206e-47im
Formula2 = 3.8424590009392195e-48 + 1.389295557234723e-47im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -1.3952881959770807e-47 - 3.618810678360166e-48im
Formula2 = -1.395288195977089e-47 - 3.6188106783600783e-48im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 1.0110422958831701e-47 - 1.0274144893987041e-47im
Formula2 = 1.011042295883167e-47 - 1.0274144893987152e-47im
-----------------------------------------------------------------
=================================================================
i = 87
lambda = 18.486321347963283 - 27.77378521424754im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -1.2482431035818887e-26 - 7.016804645101589e-27im
Formula2 = -1.2482431035818922e-26 - 7.016804645101595e-27im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 1.231794659396007e-26 - 7.301700055455669e-27im
Formula2 = 1.2317946593960098e-26 - 7.301700055455695e-27im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 1.644844418588211e-28 + 1.4318504700557255e-26im
Formula2 = 1.6448444185882412e-28 + 1.431850470055729e-26im
-----------------------------------------------------------------
=================================================================
i = 88
lambda = -3.928809286122714 - 37.34469950968864im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -1.7751234246785635e-27 - 1.7493763584036313e-27im
Formula2 = -1.775123424678564e-27 - 1.7493763584036152e-27im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 2.4025660794967373e-27 - 6.626138014226532e-28im
Formula2 = 2.4025660794967244e-27 - 6.626138014226612e-28im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -6.274426548181729e-28 + 2.4119901598262843e-27im
Formula2 = -6.274426548181604e-28 + 2.4119901598262768e-27im
-----------------------------------------------------------------
=================================================================
i = 89
lambda = 5.148818719128641 + 48.399407196241455im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.15915494309189535 - 8.470329472543003e-22im
Formula2 = -0.15915494309189535 - 8.470329472543003e-22im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.07957747154594763 - 0.13783222385544802im
Formula2 = 0.0795774715459477 - 0.13783222385544805im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.07957747154594771 + 0.13783222385544797im
Formula2 = 0.07957747154594765 + 0.13783222385544805im
-----------------------------------------------------------------
=================================================================
i = 90
lambda = -46.175332552276416 + 6.479703949590117im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -4.305868515935806e-19 - 1.1375298812288943e-14im
Formula2 = -4.305868516155242e-19 - 1.1375298812288954e-14im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 9.851513040506975e-15 + 5.687276506992453e-15im
Formula2 = 9.851513040506997e-15 + 5.687276506992444e-15im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -9.851082453655376e-15 + 5.688022305296491e-15im
Formula2 = -9.85108245365538e-15 + 5.68802230529651e-15im
-----------------------------------------------------------------
=================================================================
i = 91
lambda = -14.941852401450738 - 11.110265283880437im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 1.5034146074674922e-14 - 1.6195271336556602e-14im
Formula2 = 1.503414607467489e-14 - 1.619527133655654e-14im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 6.50844336130252e-15 + 2.111758809315288e-14im
Formula2 = 6.508443361302476e-15 + 2.111758809315283e-14im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -2.1542589435977437e-14 - 4.9223167565962716e-15im
Formula2 = -2.1542589435977368e-14 - 4.922316756596291e-15im
-----------------------------------------------------------------
=================================================================
i = 92
lambda = -5.729068494261469 + 27.668455878346606im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.15915494309189535 + 1.9735867671025198e-18im
Formula2 = -0.15915494309189535 + 1.974433800049774e-18im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.07957747154594765 - 0.13783222385544805im
Formula2 = 0.0795774715459477 - 0.13783222385544805im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.07957747154594773 + 0.13783222385544797im
Formula2 = 0.07957747154594766 + 0.13783222385544805im
-----------------------------------------------------------------
=================================================================
i = 93
lambda = -23.883660577070852 - 15.95450325228569im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -3.445573889224939e-21 + 5.7359065705850266e-21im
Formula2 = -3.4455738892249e-21 + 5.735906570585041e-21im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -3.2446538592482445e-21 - 5.851907803977659e-21im
Formula2 = -3.244653859248275e-21 - 5.851907803977634e-21im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 6.690227748473181e-21 + 1.160012333926299e-22im
Formula2 = 6.690227748473175e-21 + 1.1600123339259383e-22im
-----------------------------------------------------------------
=================================================================
i = 94
lambda = -0.7985524206762165 - 22.857978950905867im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 6.313850894647621e-17 - 1.0205090538816132e-16im
Formula2 = 6.313850894647575e-17 - 1.0205090538816136e-16im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 5.680942207211187e-17 + 1.057050053988001e-16im
Formula2 = 5.680942207211212e-17 + 1.0570500539879976e-16im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -1.1994793101858806e-16 - 3.654100010638737e-18im
Formula2 = -1.1994793101858786e-16 - 3.6541000106384076e-18im
-----------------------------------------------------------------
=================================================================
i = 95
lambda = -49.910775360977524 + 13.825578255094783im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -1.5458870100673708e-11 - 2.252212344872058e-11im
Formula2 = -1.5458870100673772e-11 - 2.252212344872029e-11im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 2.7234166104098066e-11 - 2.1267124966268497e-12im
Formula2 = 2.7234166104097856e-11 - 2.1267124966270424e-12im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -1.1775296003424347e-11 + 2.4648835945347424e-11im
Formula2 = -1.1775296003424084e-11 + 2.4648835945347334e-11im
-----------------------------------------------------------------
=================================================================
i = 96
lambda = 2.812946908901772 + 32.130168108271334im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.15915494309189535 + 1.6940658945086007e-21im
Formula2 = -0.15915494309189535 + 8.470329472543003e-22im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.07957747154594763 - 0.13783222385544802im
Formula2 = 0.0795774715459477 - 0.13783222385544805im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.07957747154594771 + 0.13783222385544797im
Formula2 = 0.07957747154594765 + 0.13783222385544805im
-----------------------------------------------------------------
=================================================================
i = 97
lambda = 42.64778683282786 + 22.951996450291972im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 0.004913512426895122 - 0.0124932849921293im
Formula2 = 0.004913512426895095 - 0.012493284992129336im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.008362745966455285 + 0.010501869079566352im
Formula2 = 0.008362745966455329 + 0.010501869079566352im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -0.013276258393350402 + 0.00199141591256295im
Formula2 = -0.013276258393350424 + 0.0019914159125629834im
-----------------------------------------------------------------
=================================================================
i = 98
lambda = -45.4587290144701 + 34.242151452714225im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -0.1591541284475854 + 5.500629534468109e-7im
Formula2 = -0.1591541284475854 + 5.500629534468215e-7im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = 0.07957658785530129 - 0.1378317933842573im
Formula2 = 0.07957658785530136 - 0.1378317933842573im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 0.07957754059228411 + 0.13783124332130378im
Formula2 = 0.07957754059228404 + 0.13783124332130386im
-----------------------------------------------------------------
=================================================================
i = 99
lambda = -46.51525529413563 - 26.067864062503542im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = -2.9870017824428895e-36 + 4.392812600213464e-36im
Formula2 = -2.9870017824428788e-36 + 4.39281260021351e-36im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -2.310786414627791e-36 - 4.783225724851673e-36im
Formula2 = -2.310786414627836e-36 - 4.783225724851689e-36im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = 5.297788197070679e-36 + 3.904131246382069e-37im
Formula2 = 5.2977881970707147e-36 + 3.904131246381782e-37im
-----------------------------------------------------------------
=================================================================
i = 100
lambda = 30.017810384090964 - 0.15329307935996184im
-----------------------------------------------------------------
FT[f](lambda)
Formula1 = 6.426242911446536e-13 + 8.763524067513948e-14im
Formula2 = 6.426242911446527e-13 + 8.763524067513867e-14im
-----------------------------------------------------------------
FT[f](alpha*lambda)
Formula1 = -3.972064902637608e-13 + 5.127113408826676e-13im
Formula2 = -3.972064902637599e-13 + 5.127113408826673e-13im
-----------------------------------------------------------------
FT[f](alpha^2*lambda)
Formula1 = -2.454178008808929e-13 - 6.003465815578068e-13im
Formula2 = -2.454178008808928e-13 - 6.003465815578059e-13im
-----------------------------------------------------------------
=================================================================
Out[192]:
true